单选题 下面的程序执行时，将把当前目录下的顺序文件smtext1.txt的内容读入内存，并在文本框Text1中显示出来。在横线处应填写______。
Private Sub Command1_Click()
Dim inData As String
Text1.Text=""
Open "./smtext1.txt"______AS #1
Do While______
Input #1,inData
Text1.Text=Text1.Text & inData
Loop
Close #1
End Sub

• A.Input (EOF(1))
• B.Input (Not EOF(1))
• C.Append (Not EOF(1))
• D.Append (EOF(1))