问答题
注意：下面出现的“”均为c:/wexam/25160001。
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上建立一个名称为P1的图片框和两个命令按钮，名称分别为Cmd1和 Cmd2，标题分别为“输出”和“清除”，如图3-1所示。要求程序运行后，每单击一次“输出”按钮，不使用任何变量而直接在图片框中显示小写字母“load me”：如果单击“清除”按钮，则清除图片框中的内容。
注意：保存时必须存放在考生文件夹下，窗体文件名为sjt1.frm，工程文件名为sjt1.vbp。
(2)在名称为Form1的窗体上建立一个名称为List1的列表框。要求：在程序运行后，通过 Form_Load()事件过程加载窗体时，执行语句List1.AddItem"AAA"，每当单击某个列表项时，都执行语句List1.AddItem List1.Text一次，如图3-2所示。
注意：保存时必须存放在考生文件夹下，窗体文件名为sjt2.frm，工程文件名为sjt2.vbp。
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上建立一个名称为P1的图片框和两个命令按钮，名称分别为Cmd1和 Cmd2，标题分别为“输出”和“清除”，如图3-1所示。要求程序运行后，每单击一次“输出”按钮，不使用任何变量而直接在图片框中显示小写字母“load me”：如果单击“清除”按钮，则清除图片框中的内容。
注意：保存时必须存放在考生文件夹下，窗体文件名为sjt1.frm，工程文件名为sjt1.vbp。
(2)在名称为Form1的窗体上建立一个名称为List1的列表框。要求：在程序运行后，通过 Form_Load()事件过程加载窗体时，执行语句List1.AddItem"AAA"，每当单击某个列表项时，都执行语句List1.AddItem List1.Text一次，如图3-2所示。
注意：保存时必须存放在考生文件夹下，窗体文件名为sjt2.frm，工程文件名为sjt2.vbp。
【正确答案】[解析]在窗体上建立好控件后，先设置控件属性，再编写事件过程。
命令按钮的标题由Caption属性设置，单击命令按钮触发Click事件。打印信息用Print方法，清除用Cls方法。题目要求在图片框中打印信息，所以在编写代码是应指定Print方法和Cls方法的使用对象。解题步骤：
第一步：建立界面并设置控件属性。程序用到的控件及其属性见表3-1。
[*]
第二步：编写代码。
参考代码：
Private Sub Cmd1_Click()
P1.Print"load me"
End Sub
Private Sub Cmd2 Click()
P1.Cls
End Sub
第三步：调试并运行程序。
第四步：按题目要求存盘。
(2)[解析]在窗体上建立好列表框后，先设置属性，再编写事件过程。
列表框用于在很多项目中做出选择的操作。向列表框中添加项目既可以在属性窗口进行，也可以在程序代码中进行．单击列表框中的项目触发Click事件，题目要求使用AddItem方法给列表框添加项目，所以应该将List1.AddItem List1.Text语句写入列表框的Click事件中。解题步骤：
第一步：建立界面并设置控件属性。
程序中只用到1个列表框控件。在窗体上画出列表框，其“Name”属性默认为“List1”。在窗体的Load事件中添加 List1.AddItem“AAA”语句使程序开始运行的时在列表框中添加“AAA”。
第二步：编写程序代码。
参考代码：
Private Sub Form_Load()
List1.AddItem "AAA"
End Sub
Private Sub List1_Click()
List1.AddItem List1.Text
End Sub
第三步：调试并运行程序。
第四步：按题目要求存盘。
答案考生文件夹
命令按钮的标题由Caption属性设置，单击命令按钮触发Click事件。打印信息用Print方法，清除用Cls方法。题目要求在图片框中打印信息，所以在编写代码是应指定Print方法和Cls方法的使用对象。解题步骤：
第一步：建立界面并设置控件属性。程序用到的控件及其属性见表3-1。
[*]
第二步：编写代码。
参考代码：
Private Sub Cmd1_Click()
P1.Print"load me"
End Sub
Private Sub Cmd2 Click()
P1.Cls
End Sub
第三步：调试并运行程序。
第四步：按题目要求存盘。
(2)[解析]在窗体上建立好列表框后，先设置属性，再编写事件过程。
列表框用于在很多项目中做出选择的操作。向列表框中添加项目既可以在属性窗口进行，也可以在程序代码中进行．单击列表框中的项目触发Click事件，题目要求使用AddItem方法给列表框添加项目，所以应该将List1.AddItem List1.Text语句写入列表框的Click事件中。解题步骤：
第一步：建立界面并设置控件属性。
程序中只用到1个列表框控件。在窗体上画出列表框，其“Name”属性默认为“List1”。在窗体的Load事件中添加 List1.AddItem“AAA”语句使程序开始运行的时在列表框中添加“AAA”。
第二步：编写程序代码。
参考代码：
Private Sub Form_Load()
List1.AddItem "AAA"
End Sub
Private Sub List1_Click()
List1.AddItem List1.Text
End Sub
第三步：调试并运行程序。
第四步：按题目要求存盘。
答案考生文件夹
【答案解析】