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

[问答题] 注意：下面出现的“考生文件夹”均为c：wexam25160001。 请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1) 在Form1的窗体上画一个名称为Text1的文本框，然后建立一个主菜单，标题为“操作”，名称为Op，该菜单有两个子菜单，其标题分别为“显示”和“隐藏”，名称分别为Dis和Hid，编写适当的事件过程。程序运行后，如果单击“操作”菜单中的“显示”命令，则在文本框中显示“计算机考试”；如果单击“隐藏”命令，则隐藏文本框。程序的运行情况如图12-1和图12-2所示。 注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm。程序中不得使用任何变量。

(2) 在窗体上画一个列表框，名称为L1，通过“属性”窗口向列表框中添加四个项目，分别为“早上好”、“中午好”、“下午好”和“晚上好”，编写适当的事件过程。程序运行后，每次单击列表框中的任何一项，则总在最后面添加一项“真有礼貌”。程序的运行情况如图12-3和图12-4所示。 注意：存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。程序中不得使用任何变量。

参考答案：

问题解析:

在窗体上建立好控件后，先设置控件属性，再编写事件过程。 菜单在“菜单编辑器”窗口中创建；在程序运行是控件是否可见该控件的Visible属性决定，如果将该值设置为True时，在对象可见，如果设置为为False时，则将隐藏该控件。解题步骤： 第一步：建立界面并设置控件属性。程序中用到的控件及其属性见表12-1。 表 12-1控　件属　性设　置　值　菜单　名称　标题　Op　操作　菜单　名称　标题　Dis　显示　菜单　名称　标题　Hid　隐藏　文本框　Name　Text　Text1　计算机考试 　　第二步：编写程序代码。　　参考代码：　　　　Private Sub Dis_Click()　　　　　　Text1.Text="计算机考试"　　　　End Sub　　　　Private Sub Hid_Click()　　　　　　Text1.Visible=False　　　　End Sub　　第三步：调试并运行程序。　　第四步：按题目要求存盘。　　(2) 在窗体上建立好控件后，先设置控件属性，再编写事件过程。　　在“属性”窗口中，通过List属性设置列表项的内容。向列表框中添加文本通过Additem方法来实现，其格式为：列表框.Addltem项目字符串[.索引值]　　Addltem方法把“项目字符串”的文本内容放入“列表框”中。解题步骤：　　第一步：建立界面并设置控件属性。程序中只用到的控件及其属性见表12-2。　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　表　12-2 控　件属　性设　置　值　列表框　Name　L1 第二步：编写程序代码。 参考代码： Private Sub L1_C1ick() L1.AddItem"真有礼貌" End Sub 第三步：调试并运行程序。 第四步：按题目要求存盘。