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

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

(2) 在Form1的窗体上画一个列表框，名称为L1，通过属性窗口向列表框中添加4个项目，分别为“早上好”、“上午好”、“中午好”和“下午好”。编写适当的事件过程，过程中只能使用一条命令。程序运行后，如果双击列表框中的某一项，则把该项再添加到列表框中。程序的运行情况如图15-3所示。 注意：存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。

参考答案：

问题解析:

在窗体上建立好控件后，先设置控件属性，再编写事件过程。 主菜单由单击右键选择“菜单编辑器”来创建，通过Print方法在窗体或图片框中打印信息，通过Cls方法清除图片框中的信息。Cls方法清除运行时Form或PictureBox所生成的图形和文本。 语法：Object.Cls object代表一个对象表达式。如果省略。object，则默认为当前的Form窗体。解题步骤： 第一步：建立界面并设置控件属性。程序中用到的控件和属性设置见表15-1。 表 15-1控　件属　性设　置　值　菜单　名字　标题　Op　操作　菜单　名字　标题　Dis　显示 　菜单　名字　标题　Clea　清除 　图片框　Name　P1　　第二步：编写程序代码。　　参考代码：　　　　Private Sub Clea_Click()　　　　　　P1.Cls　　　　End Sub　　　　Private Sub Dis_C1ick()　　　　　　P1.Print"计算机考试"　　　　End Sub　　第三步：调试并运行程序。　　第四步：按题目要求存盘。　　(2) 在窗体上建立好控件后，先设置控件属性，再编写事件过程。　　列表框的内容由属性List来设置，再程序中添加项要通过AddItem方法来实现，鼠标双击触发控件的DblClick事件。　　AddItem方法用于将项目添加到ListBox或ComboBox控件，其语法格式为：　　obiect.AddItemitem,index　　object必需的。一个对象表达式。　　item必需的。字符串表达式，它用来指定添加到该对象的项目。　　index可选的。是整数，它用来指定新项目或行在该对象中的位置。对于ListBox或ComboBox控件的首项index为0。　　解题步骤：　　第一步：建立界面并设置控件属性。程序中只用到的控件和属性设置见表15-2。　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　表　15-2 控　件属　性设　置　值　列表框　Name　L1 第二步：编写程序代码： 参考代码 Private Sub L1_DblClick() L1.Addltem L1.Text End Sub 第三步：调试并运行程序。 第四步：按题目要求存盘。