填空题

以下程序的功能是：把顺序文件smtext1.txt的内容全部读入内存，并在文本框Text1中显示出来。请填空。
Private Sub Command1_Click()
Dim inData As String
Text1.Text=""
Open "smtext1.txt" (12) As (13)
Do While (14)
Input #2, inData
Text1.Text=Text1.Text & inData
Loop
Close #2
End Sub

【参考答案】

(12)For Input (13)#2 (14)Not EOF(2)
<上一题 目录 下一题>
热门 试题

填空题
在关系数据库中，把数据表示成二维表，每一个二维表称为______。
填空题
在窗体上画一个文本框，名称为Text1，然后编写如下程序： Private Sub Form_Load() Open d: temp dat.txt For Output As #1 Text1.Text= End Sub Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii=13 Then If Ucase(Text1.text)= (10) Then Close #1 End Else Write #1, (11) Text1.Text= End If End If End Sub 以上程序的功能是：在D盘temp文件夹下建立一个名为dat.txt的文件，在文本框中输入字符，每次按回车键都把当前文本框中的内容写入文件dat.txt，并清除文本框中的内容；如果输入END，则不写入文件，直接结束程序。请填空。
相关试题