在名称为Forml的窗体上绘制一个文本框，其名称为Text1，在属性窗口中把该文本框的MultiLine属性设置为True，然后编写如下的事件过程：Private SUb Form_CnCk()Open"d:\tes\smtext1.txt"For Input AS 1Do While Not EOF(1)Line Iput 1,aspect$whole$=whole$+aspect$+Chf$(13)+Chr$(10)Loop
题目
在名称为Forml的窗体上绘制一个文本框，其名称为Text1，在属性窗口中把该文本框的MultiLine属性设置为True，然后编写如下的事件过程：
Private SUb Form_CnCk()
Open"d:\tes\smtext1.txt"For Input AS 1
Do While Not EOF(1)
Line Iput 1,aspect$
whole$=whole$+aspect$+Chf$(13)+Chr$(10)
Loop
相似考题
更多“在名称为Forml的窗体上绘制一个文本框,其名称为Text1,在属性窗口中把该文本框的MultiLine属性设 ”相关问题
-
第1题：
在名称为Form1的窗体上绘制一个文本框，其名称为Text1，在属性窗口中把该文本框的MultiLine属性设置为True，然后编写如下的事件过程：
Private Sub Form. Click()
Open "d：\test\smtext1.txt" For Input As 1
Do While Not
Line Input 1，aspects
whole$=whole$+aspect$+Chr$(13)+Chr$(10)
Loop
Text1.Text=whole$
Close 1
Open "d：\test\smtext2.txt" For Output As 1
Print 1, ______
Close 1
End Sub
上述程序的功能是，把磁盘文件smtext1.txt的内容读到内存并在文本框中显示出来，然后把该文本框中的内容存入磁盘文件smtext2.txt。
正确答案：EOF(1)Text1.Text或 Text1 或 Form1.Text1.Text或 Form1.Text1 或 Me.Text1.Text或Me.Text1
EOF(1),Text1.Text或 Text1 或 Form1.Text1.Text或 Form1.Text1 或 Me.Text1.Text或Me.Text1 解析：本题考查文件操作。文件操作是考试难点，也是众多考生认为困难的内容。首先把磁盘文件smtext1.txt的内容读到内存，如何判断文件是否读取完成呢? EOF函数的功能就是当文件指针到达文件尾部时返回True，否则返回False，当EOF(文件号)可以判断是否读取完成。 Linelnput#语句的功能是从一个打开的顺序文件中，读出一行数据赋给一个aspect$变量，然后进行相应运算，Chr(13)+Chr(10)的功能是回车换行。最后将 whole$变量的值显示在文本框中，然后关闭#1文件。接下来就是如何把文本框中的内容存入文件中，这里使用Open "d：\test\smtext2.txt" ForOutput As #1，该语句可以打开d：\test\目录下的名为smtext2.txt的文件，如果不存在，该语句将创建一个名为smtext2.txt的文件。文件的写入是由Print #语句实现，考生需要注意区分Print #语句与Write #语句的区别。 -
第2题：
在名为Form1的窗体上绘制一个文本框，其名称为Text1，然后通过属性窗口设置窗体和文本框的属性，实现如下功能：
(1)在文本框中可以显示多行文本；
(2)在文本框中显示垂直滚动条。
(3)文本框中显示的初始信息为“计算机等级考试”。
(4)文本框中显示的字体为三号规则黑体。
(5)窗体的标题为“设置文本框属性”。
完成设置后的窗体如下图所示。
注意：
不编写任何代码：文件必须存放在考生文件夹中，工程文件名为execise71.vbp，窗体文件名为execise71.frm。
正确答案：
-
第3题：
在名为Form1的窗体上绘制一个水平滚动条，其名称为HS1，设置滚动框Min属性为 1000，Max属性为2000，LargeChange属性为100，SmailChange属性为2；然后再绘制一个文本框，其名称为Text1，初始内容为空白。编写适当的事件过程，使程序运行后，移动滚动框，则在文本框中显示滚动框的当前位置。程序的运行情况如下图所示。
注意：
不得使用任何变量：文件必须存放在考生文件夹中，工程文件名为execise98.vbp，窗体文件名为execise98.frm。
正确答案：
-
第4题：
在名为Form1的窗体上绘制一个文本框(名称为Text1)和一个水平滚动条(名称为 HSl)。在属性窗口中对滚动条设置如下属性：
Min 500
Max 2000
LargeChange 50
SmallChange 20
编写适当的事件过程，使程序运行后，若移动滚动条上的滚动框，则可扩大或缩小文本框的高度，并使得文本框的宽度始终是其高度的1.2倍。运行后的窗体如下图所示。
注意：
要求程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为execise58.vbp，窗体文件名为execise58.frm。
正确答案：
-
第5题：
在名为Form1的窗体上绘制一个文本框(名称为Text1，Text属性为“京”，Font属性为“宋体”)和一个水平滚动条(名称为HS1)。在属性窗口中对滚动条设置如下属性：
Min 10
Max 100
LargeChange 5
SmallChange 2
编写适当的事件过程，使程序运行后，若移动滚动条上的滚动框，则可扩大或缩小文本框中的“京”字。运行后的窗体如下图所示。
注意：
程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为 execise90.vbp，窗体文件名为execise90.frm。
正确答案：