设窗体上有一个名称为CDl的通用对话框、一个名称为Textl的文本框和一个名称为Commandl的命令按钮。程序执行时，单击Commandl按钮，则显示打开文件对话框，操作者从中选择一个文本文件，并单击对话框上的“打开”按钮后，则可打开该文字文件，并读人一行文本，显示在Textl中。下面是实现此功能的事件过程，请填空。 Private Sub Command1_Click CD1.Filter=“文本文件|*.txt|Word文档|*.doc” CDl.FilterIndex=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
设窗体上有一个名称为CDl的通用对话框、一个名称为Textl的文本框和一个名称为Commandl的命令按钮。程序执行时，单击Commandl按钮，则显示打开文件对话框，操作者从中选择一个文本文件，并单击对话框上的“打开”按钮后，则可打开该文字文件，并读人一行文本，显示在Textl中。下面是实现此功能的事件过程，请填空。 Private Sub Command1_Click CD1.Filter=“文本文件|*.txt|Word文档|*.doc” CDl.FilterIndex=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
相关考题：
在窗体上画一个名称为Textl的文本框和一个名称为Commandl的命令按钮，然后编写如下事件过程：Private Sub Commandl_Click()Dim i As Integer，n As IntegerFor i=0 T0 50i=i+3n=n+1If i10 Then Exit ForNextTextl．Text=Str(n)End Sub程序运行后，单击命令按钮，在文本框中显示的值是A．2B．3C．4D．5
窗体上有名称为Commandl的命令按钮及名称为Textl、能显示多行文本的文本框。程序运行后，如果单击命令按钮，则可打开磁盘文件c：＼test．txt，并将文件中的内容(多行文本)显示在文本框中。下面是实现此功能的程序，请填空。Private Sub Commandl_Click()Textl=“”Number=FreeFileOpen“c：＼test．txt”For Input As NumberDo While Not EOF(【 】)Line InputNumber，sTextl．Text=Textl．Text+【 】+Chr(13)+Chr(10)LoopClose NumberEnd Sub
设在窗体上有一个名称为Commandl的命令按扭和一个名称为Textl的文本框。要求单击Commandl按钮时可把光标移到文本框中。下面正确的事件过程是。 A．Private Sub Commandl_Click B．Private Sub Commandl_Click Textl．GotFocus Commandl．GotFocus End Sub End Sub C．Private Sub Commandl_Click D．Private Sub Commandl_Click Textl．SetFocus Commandl．SetFocus End Sub End sub
在窗体上画一个名称为Commandl的命令按钮和一个名称为Text1的文本框。程序运行后，Command1为禁用(灰色)。当向文本框中输入任何字符时，命令按钮Command1变为可用。请在（ ）处填入适当的内容，将程序补充完整。
在窗体中添加一个命令按钮(名为Commandl)和一个文本框(名为Textl)，然后编写如下事件过程：