设窗体上有一个名为CD1的通用对话框、一个名为Text1的文本框和一个名称为Command1的命令按钮。程序执行时,单击Command1按钮,则显示“打开”文件对话框,操作者从中选择一个文本文件,并单击对话框上的“打开”按钮后,则可打开该文本文件,并读入一行文本,显示在Text1中。下面是实现此功能的事件过程,请填空。
Private Sub Command1_Click()
CD1.Filter="文本文件|*.txt|Word文档|*.doc"
CD1.FilterIndex=1
CD1.ShowOpen
If CD1.FileName<>""Then
Open______For Input As #1
Line Input #1,ch$
Close #1
Text1.Text=______
End If
End Sub
参考答案:Cd1.FileName;ch
解析: 本题考查通用对话框。单击命令按钮时,如果选中的文件名不为空,那么以读的方式打开文件,Open后面写打开文件的绝对路径,故第一空应填CD1.FileName。读入一行文本,放到变量ch中,显示在Text1中,因此第二空处应填ch。