2. 计算机
  3. 在考生文件夹下有文件in5.txt，文件中有几行汉字。请在Form1的窗体上画一个文本框，名称为Text1，能显示多行；再画一个命令按钮，名称为C1标题为“存盘”。编写适当的事件过程，使得在加载窗体时，把 in5.txt 文件的内容显示在文本框中，然后在文

在考生文件夹下有文件in5.txt，文件中有几行汉字。请在Form1的窗体上画一个文本框，名称为Text1，能显示多行；再画一个命令按钮，名称为C1标题为“存盘”。编写适当的事件过程，使得在加载窗体时，把 in5.txt 文件的内容显示在文本框中，然后在文

admin2019-05-14  42
问题 在考生文件夹下有文件in5.txt，文件中有几行汉字。请在Form1的窗体上画一个文本框，名称为Text1，能显示多行；再画一个命令按钮，名称为C1标题为“存盘”。编写适当的事件过程，使得在加载窗体时，把 in5.txt 文件的内容显示在文本框中，然后在文本的最前面手工插入一行汉字“计算机等级考试”（如图1－5 所示）。最后单击“存盘”按钮，把文本框中修改过的内容存到文件out5.txt 中。

    注意：只能在最前面插入文字，不能修改原有文字。文件必须存放在考生文件夹下，以sjt5.vbp 为文件名存储工程文件，以sjt5.frm 为文件名存储窗体文件。
选项
答案【操作步骤】 步骤1：新建一个“标准EXE”工程，按要求画出控件并设置属性。 步骤2：打开代码编辑窗口，编写相应事件过程。 参考代码： Private Sub C1_Click() Open "out5.txt" For Output As #1 Print #1, Text1.Text Close #1 End Sub Private Sub Form_Load() Open "in5.txt" For Input As #1 Text1.Text = "" Do While Not EOF(1) Line Input #1, a$ Text1.Text = Text1.Text + a$ + Chr(13) + Chr(10) Loop Close #1 End Sub 步骤3：按＜F5＞键运行程序，在文本的最前面手工插入一行汉字：“计算机等级考试”，然后单击“存盘”按钮保存结果。 步骤4：按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://www.kaotiyun.com/show/VTUp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)