在名称为Form1的窗体上画一个名称为Command1的命令按钮,标题为“打开文件”,再画一个名称为CD1的通用对话框。程序运行后,如果单击命令按钮,则弹出打开文件对话框,如下图所示。
参考答案:第一步:启动Visual Basic,新建一个工程文件。
第二步:单击工具箱上的“命令按钮”控件,在窗体上画一个命令按钮,将其Caption属性设置为“打开文件”,Name属性设置为Command1。
第三步:在“工程”菜单下选择“部件”,在弹出的对话框中选择“MicrosoftCommon Dialog Control”,单击“确定”按钮,然后在工具箱中选择“Common Dialog”控件,在窗体上画一个通用对话框,在属性窗口中将其Name属性设置为CD1,Dialog Title属性设置为“打开文件”,Filter属性设置为“所有文件|*.*|文本文件|*.txt”。
第四步:编写程序源代码:
1 Private Sub Command1_Click( )
2 Me.CD1.ShowOpen
3 End Sub
第五步:调试并运行程序,运行正确后按要求保存。
解析: 本题主要考查了文件对话框的使用,文件对话框在使用之前必须首先通过在“工程”菜单下选择“部件”,在弹出的对话框中选择“Microsoft Common Dialog Control”,单击“确定”后加载到工具箱中,然后才可使用。文件对活框在窗体开始运行时是不可见的,只有通过某一事件的触发使其显示出来,完成相应操作。所以本题中在Command的Click事件过程中调用其ShowOpen事件使其显示。