[问答题] 注意：下面出现的“考生文件夹”均为C：wexam25160002。 请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1) 在名称为Form1的窗体上画一个

[问答题] 注意：下面出现的“考生文件夹”均为C：wexam25160002。 请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1) 在名称为Form1的窗体上画一个名称为Command1的命令按钮，标题为“打开文件”，再画一个名称为CD1的通用对话框。程序运行后，如果单击命令按钮，则弹出打开文件对话框。请按下列要求设置属性并编写代码： 设置适当属性，使对话框的标题为“打开文件”；设置适当属性，使对话框的“文件类型”下拉式组合框中有二行：“文本文件”、“所有文件”，如图23-1所示，默认的类型是“所有文件”；编写代码，使得单击按钮可以弹出打开文件对话框。要求：程序中不得使用变量，事件过程中只能写一条语句。 注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm。 (2) 在名称为Form1的窗体上画一个命令按钮，名称为Command1，标题为“移动本按钮”，如图 23-2所示。要求编写适当的事件过程，使得程序运行时，每单击按钮一次， 按钮向左移动100。要求：程序中不得使用变量，事件过程中只能写一条语句。 注意：存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。

参考答案：

问题解析:

在窗体上建立好控件后，先设置控件属性，再编写事件过程。 在Visual Basic中，命令按钮的名称由Caption属性设置。通用对话框的属性可以在属性窗口中直接设置。将 CommonDialog的Name属性设置为CD1，文件类型在CommonDialog的Filter属性中设置，其格式为： 文件说明|文件类型 本题应在Filter属性中设置为：文本文件|*.txt|所有文件|*.*。解题步骤： 第一步：建立界面并设置控件属性。程序中用到的控件及属性设置见表23-1。 表 23-1控　件属　性设　置　值　按钮　Caption　打开文件　通用对话框　(名称)　 DialogTitle　 Filter 　CD1　打开文件　 文本文件|*.txt|所有文件|*.*|　　第二步：编写程序代码。　　参考代码：　　　　Option Explicit　　　　Private Sub Command1_Click()　　　　　　CD1.ShowOpen　　　　End Sub　　第三步：调试并运行程序。　　第四步：按题目要求存盘。　　(2) 在窗体上建立好控件后，先设置控件属性，再编写事件过程。　　在Visual Basic中，按钮的标题由Caption属性设置。要使命令按钮向左移动，须用到按钮的Left属性，使其值再每单击一次按钮时减去100。解题步骤：　　第一步：建立界面并设置控件属性。程序中用到的控件及属性设置见表23-2。　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　表　23-2控　件属　性设　置　值　按钮　(名称)　 Caption　Command1　移动本按钮 第二步：编写程序代码。 参考代码： Option Explicit Private Sub Command1_Click() Command1.Left=Command1.Left-100 End Sub 第三步：调试并运行程序。 第四步：按题目要求存盘。