下列程序实现的功能是:当在窗体上单击时,将在窗体上输出c:\a1.txt文件中的所有小写字母。
Private Sub Form_Click()
Dim Ch As String*1
Open"c:\a1.txt"For Input As #10
Do While 【13】
Ch=Input(1,#10)
If 【14】 Then
Print Ch;
End If
Loop
【15】
End Sub
【参考答案】
[13]Not EOF(10) [14]Ch>="a" And Ch<="z" [15]Close #10