问答题
在名称为Form1的窗体上添加一个名称为Command1的命令按钮，标题为“打开文件”，再添加一个名称为CD1的通用对话框。程序运行后，如果单击命令按钮，则弹出打开文件对话框，请按下列要求设置属性和编写代码：
①设置适当属性，使对话框的标题为“打开文件”；
②设置适当属性，使对话框的“文件类型”下拉式组合框中有两项可供选择：“文本文件”、“所有文件”(如图所示)，默认的类型是“所有文件”；
③编写命令按钮的事件过程，使得单击按钮可以弹出“打开文件”对话框。
要求：程序中不得使用变量，事件过程中只能写入一条语句。
注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjt1.vbp，窗体文件名保存为sjt1.frm。
①设置适当属性，使对话框的标题为“打开文件”；
②设置适当属性，使对话框的“文件类型”下拉式组合框中有两项可供选择：“文本文件”、“所有文件”(如图所示)，默认的类型是“所有文件”；
③编写命令按钮的事件过程，使得单击按钮可以弹出“打开文件”对话框。
要求：程序中不得使用变量，事件过程中只能写入一条语句。
注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjt1.vbp，窗体文件名保存为sjt1.frm。
【正确答案】[考点分析]
本题考点有：通用对话框的Action、Dialogtitle、Name和Filter属性，命令按钮的Name和Caption属性以及通用对话框的ShowOpen方法。
[解题思路]
通用对话框是一种ActiveX控件，在一般情况下，启动Visual Basic后，在工具箱中没有通用对话框控件。为了把通用对话框控件加到工具箱中，其操作步骤如下：执行“工程”菜单中的“部件”命令，打开“部件”对话框，在对话框中，选择“控件”选项卡，然后在控件列表框中，选择“Microsoft Common Dialog Control 6.0”，再单击“确定”按钮，通用对话框立即被加到工具箱中。通用对话框的属性可以在属性窗口中直接设置。
当通用对话框显示为“打开’’或“另存为”类型时，其FileName属性用于返回或设置所选的文件的路径和文件名。Filter(过滤器)属性用于指定在对话框的文件列表中显示文件的类型。语法为“对象名.Filter='描述|文件扩展名'"。
打开顺序文件的基本格式为“Open FileName For Mode As#FileNumber”。FileName表示要打开的文件的路径；Mode为打开模式，OutPut用于输出，Append用于追加写入，Input用于读取；FileNumber为打开文件时指定的句柄。
[操作步骤]
步骤1：新建一个窗体，按照要求建立控件并设置其属性，如图所示。程序中用到的控件及属性见表。
本题考点有：通用对话框的Action、Dialogtitle、Name和Filter属性，命令按钮的Name和Caption属性以及通用对话框的ShowOpen方法。
[解题思路]
通用对话框是一种ActiveX控件，在一般情况下，启动Visual Basic后，在工具箱中没有通用对话框控件。为了把通用对话框控件加到工具箱中，其操作步骤如下：执行“工程”菜单中的“部件”命令，打开“部件”对话框，在对话框中，选择“控件”选项卡，然后在控件列表框中，选择“Microsoft Common Dialog Control 6.0”，再单击“确定”按钮，通用对话框立即被加到工具箱中。通用对话框的属性可以在属性窗口中直接设置。
当通用对话框显示为“打开’’或“另存为”类型时，其FileName属性用于返回或设置所选的文件的路径和文件名。Filter(过滤器)属性用于指定在对话框的文件列表中显示文件的类型。语法为“对象名.Filter='描述|文件扩展名'"。
打开顺序文件的基本格式为“Open FileName For Mode As#FileNumber”。FileName表示要打开的文件的路径；Mode为打开模式，OutPut用于输出，Append用于追加写入，Input用于读取；FileNumber为打开文件时指定的句柄。
[操作步骤]
步骤1：新建一个窗体，按照要求建立控件并设置其属性，如图所示。程序中用到的控件及属性见表。
【答案解析】