[填空题] 以下程序的功能是：把顺序文件smtext1.txt的内容全部读入内存，并在文本框Text1中显示出来。请填空。
Private Sub Command1_Click()
Dim inData As String
Text1.Text=" "
Open"smtext1.txt" (13) As (14)
Do While (15)
Input #2 ,inData
Text1.Text=Text1.Text＆inData
Loop
Close #2
End Sub
[填空题] 以下程序的功能是：把顺序文件smtext1.txt的内容全部读入内存，并在文本框Text1中显示出来。请填空。
Private Sub Command1_Click()
Dim inData As String
Text1.Text=" "
Open"smtext1.txt" (13) As (14)
Do While (15)
Input #2 ,inData
Text1.Text=Text1.Text＆inData
Loop
Close #2
End Sub
For Input
VIP截止日期：2025-01-02 02:45:38
←请使用支付宝扫码支付
VIP截止日期：2025-01-02 02:45:38
←请使用微信扫码支付
