( 8 ) 设窗体上有一个名称为 CD1 的通用对话框 , 一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮。程序执行时,单击 Command1 按钮,则显示打开文件对话框,操作者从中选择一个文本文件,并单击对话框上的 “ 打开 ” 按钮后 , 则可打开该文本文件 , 并读入一行文本 , 显示在 Text1 中 。 下面是实现此功能的事件过程,请填空。Private Sub Command1_Click()CD1.Filter =" 文本文件 1*.txt(Word 文档 )*.doc"CD1.Filterinder = 1CD1.ShowOpenIf CD1.FileName""ThenOpen [9] For Input As #1Line Input #1,ch$Close #1Text1.Text = [10]End IfEnd Sub
( 8 ) 设窗体上有一个名称为 CD1 的通用对话框 , 一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮。程序执行时,单击 Command1 按钮,则显示打开文件对话框,操作者从中选择一个文本文件,并单击对话框上的 “ 打开 ” 按钮后 , 则可打开该文本文件 , 并读入一行文本 , 显示在 Text1 中 。 下面是实现此功能的事件过程,请填空。
Private Sub Command1_Click()
CD1.Filter =" 文本文件 1*.txt(Word 文档 )*.doc"
CD1.Filterinder = 1
CD1.ShowOpen
If CD1.FileName<>""Then
Open [9] For Input As #1
Line Input #1,ch$
Close #1
Text1.Text = [10]
End If
End Sub
相关考题:
在窗体上有一个名称为CD1的通用对话框和一个名称为Comrnand1的命令按钮。要求单击命令按钮时,打开一个保存文件的通用对话框。该窗口的标题为“保存”,缺省文件名为“ABC”, 在“文件类型”栏中显示*.txt。则能够满足上述要求的稗序县( )。\
在窗体上有若干控件,其中有一个名称为Text1的文本框。影响Text1的Tab顺序的属性是( )。A.TabStopB.EnabledC.VisibleD.TabIndex