在名称为Form1的窗体上添加一个名称为Label1、标题为“添加项目”的标签;添加一个名称为Text1的文本框,初始内容为空;添加一个名称为Combol的下拉式组合框,并通过属性窗口输入若干项目(不少于3个,内容任意);再添加两个命令按钮,名称分别为Command1、Command2,其标题分别为“添加”、“统计”。在程序运行时,向Text1中输入字符,单击“添加”按钮后,则将Text1中的内容作为一个列表项被添加到组合框的列表中;单击“统计”按钮,则在窗体空白处显示组合框中列表项的个数,如图所示。请编写两个命令按钮的Click事件过程。
注意:程序中不得使用变量,也不能使用循环结构。存盘时必须存放在考生文件夹下,工程文件名保存为sjt3.vbp,窗体文件名保存为sjt3.frm。
参考答案:
[考点分析]
本题考点有:命令按钮的Caption和Name属性,下拉式组合框的Caption、Name、List和ListCount属性,文本框的Text和Name属性,标签的Caption和Name属性,下拉式组合框的AddItem方法以及窗体的Print方法。
[解题思路]
命令按钮和标签的标题用属性窗口中的Caption属性设置。要使Text1的文本框没有初始内容,需要将属性窗口中的Text属性设为空。要在下拉式组合框中输入内容,可以在属性窗口中对下拉式组合框的List属性进行设置。
AddItem方法用来向组合框中添加一个列表项,其格式为:
组合框.Addhem列表项[索引]
ListCount属性用来返回组合框中列表项的个数。
[操作步骤]
步骤1:新建一个窗体,按照题目要求建立控件并设置控件属性,如图所示。
程序中用到的控件及属性设置见表。
步骤2:打开代码编辑窗口,在指定位置编写如下代码。
参考答案:
Private Sub Command1_Click()
Combol.AddItem Text1
End Sub
Private Sub Command2_Click()
Print Combol.ListCount
End Sub
步骤3:调试并运行程序,关闭程序后按题目要求存盘。