2. 计算机
  3. 把一个磁盘文件的内容读到内存并在文本框中显示出来，然后把该文本框中的内容存人另一个磁盘文件，请填空完成程序。在窗体上建立一个文本框，在属性窗口中把该文本框的Muhiline属性设置为True，然后编写如下的事件过程： Private Sub Fo

把一个磁盘文件的内容读到内存并在文本框中显示出来，然后把该文本框中的内容存人另一个磁盘文件，请填空完成程序。在窗体上建立一个文本框，在属性窗口中把该文本框的Muhiline属性设置为True，然后编写如下的事件过程： Private Sub Fo

admin2009-02-13  84
问题 把一个磁盘文件的内容读到内存并在文本框中显示出来，然后把该文本框中的内容存人另一个磁盘文件，请填空完成程序。在窗体上建立一个文本框，在属性窗口中把该文本框的Muhiline属性设置为True，然后编写如下的事件过程：
     Private Sub Form_Click(   )
        Open"d：\test\smtext1．txt"For lnput As#1
        Text1.Fontsize=14
        Text1.FontName=“幼圆”
        Do While Not EOF(1)
       【  】
          whole＄=whole $ aspect $+Chr$(13)+Chr $(10)
        Loop
        Text1.Text=【  】。
        Close
        Open"d：\test\smtexttxt"For Output As#1
        Print #1【  】
        Close
        End Sub
选项
答案Line lnput #1，Aspect＄ , whole＄ , Text1.Fext
解析 lnput#与Line lnput#句都可以从顺序文件中读人数据。区别在于Input#仅仅读人数据项，后接变量表，读人几项数据就用几个变量来接收。Line lnput#语句用来从顺序文件中读取一个完整的行，并把它赋给一个字符串变量。对于本题，由于要读人一个完整的文件，并使用Do循环将每次读入的数据通过aspect＄接受并最终赋给whole＄变量，故[8]处应填：Line lnput #1，aspect＄。 EOF(1)函数测试文件是否被读取完，当Do循环语句执行完毕后，磁盘文件被完全赋给变量whole＄。此时要在文本框中显示，则[9]处应填：whole＄。磁盘文件读入文本框后，便执行写入另一磁盘文件的操作。写入用Print#语句。该语句后接两个常用参数：文件号与表达式。本题中“1”表示文件号，即在上一步中打开读人的文件。[10]处应填表达式，即：Text1.Text。表示把Text1.Text中的内容写入到 smtext2.txt中。
转载请注明原文地址:https://kaotiyun.com/show/B91p777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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