问题 问答题

完成下列问题:

在名称为Form1的窗体上画一个名称为Command1的命令按钮,标题为“打开文件”,再画一个名称为CD1的通用对话框。程序运行后,如果单击命令按钮,则弹出打开文件对话框。请按下列要求设置属性和编写代码:
①设置适当的属性,使用话框的标题为“打开文件”。
②设置适当的属性,使对话框的“文件类型”下拉列表框中有2个选项:“文本文件”、“所有文件”(如图1所示),默认的类型是“所有文件”。
[*]
③编写命令按钮的事件过程,使得单击按钮可以弹出打开文件对话框。
要求:程序中不得使用变量,事件过程中只能写一条语句。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm。

答案

参考答案:[操作步骤]
第1步:新建一个标准EXE工程。
第2步:添加命令按钮。在窗体上有一个命令按钮控件,设置其Caption属性为“打开文件”。
第3步:添加通用对话框。选择“工程”菜单下的“部件”子菜单,在弹出的“部件”对话框中的Microsoft Common Dialog Control 6.0前的复选框中打上勾号,再单击“确定”按钮。此时,在工具箱的右下角会显示出通用对话框控件图标

,选择该图标在窗体上画一个通用对话框控件。
第4步:设置通用对话框的属性。设置通用对话框的名称属性为CD1,设置DialogTitle属性为“打开文件”,设置Filter属性为“文本文件|*.txt|所有文件|*.*”,设置FilterIndex属性为2,如图1所示。


第5步:编写代码。双击窗体上的命令按钮,编写命令按钮的事件过程代码如下:
Private Sub Command1_Click()
CD1.ShowOpen
End Sub
第6步:调试并运行程序,并按题目要求保存工程。

解析: 本题需要用到外部控件通用对话框Microsoft Common Dialog Control,通用对话框的标题由DialogTitle属性控制;文件类型的过滤方式由Filter属性控制,当有多种过滤方式时,可用FilterIndex属性指定默认的过滤方式。

填空题
解答题