题目内容（请给出正确答案）

[主观题]

设窗体上有一个名称为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

提问人：网友dcmztc2008 发布时间：2022-01-06

参考答案

查看官方参考答案

如搜索结果不匹配，请联系老师获取答案

您可能会需要：

重置密码查看订单联系客服

安装简答题APP，拍照搜题省时又省心！

更多“设窗体上有一个名称为CDl的通用对话框、一个名称为Textl…”相关的问题

第1题

窗体上有1个名称为CD1的通用对话框，1个名称为Commandl的命令按钮。命令按钮的单击事件过程如下：Pr

窗体上有1个名称为CD1的通用对话框，1个名称为Commandl的命令按钮。命令按钮的单击事件过程如下： Private Sub Commandl_Click() CD1.FileName="" CD1.Filter="AllFiles|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt" CD1.FilterIndex=2 CD1.Action=1 End Sub 关于以上代码，错误的叙述是()。

A．执行以上事件过程，通用对话框被设置为“打开”文件对话框

B．通用对话框的初始路径为当前路径

C．通用对话框的默认文件类型为*.Txt

D．以上代码不对文件执行读写操作

点击查看答案

第2题

窗体上有一个名称为commondialog1的通用对话框，一个名称为Command1的命令按钮，并有如下事件过程：

Private Sub Command1_Click()

Commondialog1.defauhext=”doc”

Commondialog1.filcname=”vb.txt”

Commondialog1.filter=”Alt(*.*)”|*.*|word|*.doc|”

Commondialog1.filerindex=1

Commondialog1.showsave

End Sub

运行上述程序，如下叙述中正确的是

A)打开的对话框中文件“保存类型”框中显示“All(*.*)”

B)实现保存文件的操作，文件名是VB.Txt

C)defauext属性五filename属性所指明的文件类型不一致，程序出错

D)对话框的filter属性没有指出txt类型，程序运行出错

点击查看答案

第3题

窗体上有1个过程为CD1的通用对话框，1个名称为Command1晌命令按钮。命令按钮的单击事件过程如下： P

窗体上有1个过程为CD1的通用对话框，1个名称为Command1晌命令按钮。命令按钮的单击事件过程如下： Private Sub Command1_Click() CD1.FileName=" " CD1.Filter="All Files|*.*|(*.DoC)|*.Doc|(*.Txt)|*.Txt" CD1.FilterIndex=2 CD1.Action=1 End Sub 关于以上代码，错误的叙述是______。

A．执行以上事件过程，通用对话框被设置为“打开”文件对话框

B．通用对话框的初始路径为当前路径

C．通用对话框的默认文件类型为*.Txt

D．以上代码不对文件执行操作

点击查看答案

第4题

窗体上有一个名称为CommonDialog1的通用对话框，一个名称为Command1的命令按钮，并有如下事件过程：

Private Sub Command1_Click（） CommonDialog．DefaultExt="doc" CommonDialog．FileName="VB．txt" CommonDialog．Filter="All(*．*)|*．*|Word|．Doc|" CommonDialog．FilterIndex=1 CommonDialog．ShowSave End Sub 运行上述程序，如下叙述中正确的是（）。

A.打开的对话框中文件“保存类型”框中显示All(*．*)

B.实现保存文件的操作，文件名是VB．txt

C.DefaultEx1属性与FileName属性所指明的文件类型不一致，程序出错

D.对话框的Fiber属性没有指出txt类型，程序运行出错

点击查看答案

第5题

窗体上有1个名称为CD1的通用对话框，1个名称为Command1的命令按钮。命令按钮的单击事件过程

如下：

Private Sub Command1_Click（）

CD1.FileName=""

CD1.Filter="All Files|*.*|（*.Do

CD1|*.Doc|（*.Txt）|*.txt"