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

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

admin2016-01-31  36
问题 在考生文件夹下有文件in5．txt，文件中有几行汉字。请在Form1的窗体上画一个文本框，名称为Text1，能显示多行；再画一个命令按钮，名称为C1，标题为“存盘”。编写适当的事件过程，使得在加载窗体时，把in5．txt文件的内容显示在文本框中，然后在文本的最前面手工插入一行汉字“计算机等级考试”(如图3-197所示)。最后单击“存盘”按钮，把文本框中修改过的内容存到文件out5．txt中。
   
    注意：只能在最前面插入文字，不能修改原有文字。文件必须存放在考生文件夹下，以sjt5．vbp为文件名存储工程文件，以sjt5．frm为文件名存储窗体文件。
选项
答案审题分析 程序设计思路：在窗体的加载事件过程中，用Open语句以Input方式打开数据文件in5．txt，并用LineInput语句读出所有字符后显示在文本框中；在“存盘”按钮的单击事件过程中，用Open语句以Output方式打开数据文件out5．txt，并用Print#方将文本框的内容存入该文件。 操作步骤 步骤1：新建一个“标准EXE”工程，按要求画出控件并设置属性。 步骤2：打开代码编辑窗口，编写相应事件过程。 参考代码： PriVate Sub C1_Click() Oper1"out5．txt"For Output As #1 Print #1，Text1．Text Close #1 End Sub PriVate Sub Form_Load() Open "in5．txt" For Input．Ks #1 Text1．Text=" " Do While Not EOF(1) LineInput #1，a$ Text1．Text=Text1．Text+a$+Chr(13)+Chr(10) Loop Close #1 End Sub 步骤3：按键运行程序，在文本的最前面手工插入一行汉字：“计算机等级考试”，然后单击“存盘”按钮保存结果。 步骤4：按要求将文件保存至考生文件夹中。 考点链接 顺序文件、Do循环和While循环。
解析
转载请注明原文地址:https://www.kaotiyun.com/show/IrLp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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