注意：下面出现的“考生文件夹”均为%USER%

　　请根据以下各小题的要求设计Visual Basic应用程序（包括界面和代码）。

　　（1）在标题为“列表框”、名称为Form1的窗体上画一个名称为List1列表框，通过属性窗口输入四个列表项：“数学”、“语文”、“历史”、“地理”，列表项采用“复选框形式”，如图所示。列表框的宽为1100，高不限。

　　注意：

　　存盘时必须存放在考生文件夹下，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm。

　　解题思路：

　　启动Visual Basic系统，创建一个Form1窗体。

　　在该窗体上画一个列表框控件，通过其属性窗口将名称设为List1，向列表框中添加项目（List属性），添加的项目分别为“数学”、“语文”、“历史”、“地理”，每个项目为一行，宽（Width属性）设为1100，Style属性设为1。

　　参考文件：c:/wexam/26990001/hlpsys/参考答案/sjt1.vbp、sjt1.frm、sjt1.vbw

　　请把这些文件复制到c:/wexam/26990001中，然后打开sjt1.vbp文件并运行。

　　（2）在名称为Form1的窗体上建立一个名称为“menu1”、标题为“文件”的弹出式菜单，含有三个菜单项，它们的标题分别为：“打开”、“关闭”、“保存”，名称分别为“m1”、“m2”、“m3”。再画一个命令按钮，名称为“Command1”、标题为“弹出菜单”。要求：编写命令按钮的 Click事件过程，使程序运行时，单击“弹出菜单”按钮可弹出“文件”菜单（如图所示）。

　　注意：

　　程序中不得使用变量，事件过程中只能写一条语句。

　　存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。

　　解题思路：

　　启动Visual Basic系统，创建一个Form1窗体。

　　在该窗体上通过菜单编辑器建立一个主菜单，在菜单编辑器的标题处输入“文件”，名称处输入menu1，将“可见”单选按钮设为不选状态。在“文件”菜单下有三个子菜单，在菜单编辑器的标题处分别输入“打开”、“关闭”、“保存”，名称处分别输入m1、m2、m3。画一个命令按钮控件，通过其属性窗口将名称设为Command1，标题（Caption属性）设为“弹出菜单”。单击“弹出菜单”按钮（即运行Click事件过程），在该Click事件过程中加入语句：

　　Private Sub Command1_Click()

　　Form1.PopupMenu menu1

　　'或 PopupMenu menu1

　　End Sub

　　参考文件：c:/wexam/26990001/hlpsys/参考答案/sjt2.vbp、sjt2.frm、sjt2.vbw

　　请把这些文件复制到c:/wexam/26990001中，然后打开sjt2.vbp文件并运行。