[填空题] 设窗体上有一个名称为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
(9)CD1.FileName (10)ch
参考解析:根据题中代码,要打开文本文件,应该在第[9]空填写选择好的文件名,文件名从通用对话框CD1中获得,所以第[9]空填CD1.FileName;打开文件后,读入一行文本放入到了Ch变量中,所以为了将读入的一行文本显示在Text1中,应在第[10]空填写ch。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)