题目
Private Sub Combo1_KeyPress(KeyAscii As Integer)
If KeyAscii=13 Then
For i=0 To Combo1.ListCount-1
If Combo1.Text=【 】Then
Label2.Caption="输入项已在组合框中。"
Exit Sub
End If
Next i
Label2.Caption="已成功添加新输入项。"
Combo1.【 】Combo1.Text
End If
End Sub
第1题
(7 )设窗体上有一个名称为 Combol 的组合框,并有以下程序:
Private Sub Combol_KeyPress(KeyAscii As Integer)
If 【 9 】 =13 Then ‘ 回车符的 ASCII 码是 13
For k=0 To Combol.ListCount-1
If Combol.Text= Combol.List(k) Then
Combol.Text= ” ”
Exit For
End If
Next k
If Combol.Text <> “” Then
Combol.AddItem 【 10 】
End If
End If
End Sub
程序的功能是 : 在组合框的编辑区中输入文本后按回车键 , 则检查列表中有无与此文本相同的项目 , 若有 ,则把编辑区中的文本删除,否则把编辑区中文本添加到列表的尾部。请填空。
第2题
Option Base 1
Private Sub Command1_Click()
Dim city As Variant
city=_______(”北京”,”天津”,”上海”,”武汉”,”重庆”,”西宁”)
For i=_______ To UBound(city)
Combol.AddItem_______
Next
End Sub
第3题
A.Combo1.RemoveItem Combo1.Text
B.Combo1.Removeltem4
C.Combo1.RemoveItem Combo1.ListCount
D.Combo1.RemoveItem5
第4题
A.Text1.Text=Combol.List(2)
B.Text1.Text=Combol.Text
C.Text1.Text=Combol.List(3)
D.Text1.Text=Combol.ListIndex
第5题
在窗体上画1个组合框(名称为Cbl,设置为简单组合框)和1个命令按钮(名称为C1,标题为“添加”),编写适当的事件过程。程序运行后,在组合框中输入一个列表项,单击命令按钮后,程序检查组合框的下拉列表,如果列表中没有此项,则把此项添加到列表中;如果有此项,则通过信息框提示“此项已存在”,并清除输入的内容。程序的运行情况如图2—1所示。
存盘时,工程文件名为sjt3.vbp,窗体文件名为sjt3.frm。
2.在窗体上画一个名称为L1的列表框,通过属性窗口向列表框中添加3个项目,分别为“123”、“456”和“789”。编写适当的事件过程。程序运行后,每次双击列表框中的任何一项,则总在最后面添加一项,该项的内容为前面所有项之和。程序的运行情况如图2—2所示。
注意:保存时必须存放在考生文件夹下,窗体文件名为sjt4.frm,工程文件名为sjr4.vbp。
第6题
第7题
在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程:
运行程序,单击命令按钮,则在弹出的信息框的标题栏中显示的是__________。
第8题
Private Sub Combol_KeyPress(KeyAscii As Integer)
If KeyAscii=13 Then
For i=0 To Combo1 ListCount-1
If Combo1 Text= 【 12 】 Then
Label2 Caption=" 输入项已在组合框中。 "
Exit Sub
End If
Next i
Label2 Caption=" 已成功添加新输入项。 "
Combo1 ______ Combo1 Text
End If
End Sub
第9题
在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程:
Private Sub Command1_Cilck()
End Sub
运行程序,单击命令按钮,则在弹出的信息框的标题栏中显示的是()。
第10题
注意:下面出现的“考生文件夹”均为C:\wexam\25160002。
(1) 在名称为Form1的窗体上画一个名称为Label1,标题为“添加项目:”的标签;画一个名称为 Text1的文本框,没有初始内容;画一个名称为Combo1的下拉式组合框,并通过属性窗口输入若干项目 (不少于3个,内容任意);再画两个命令按钮,名称分别为Command1和Command2,标题分别为“添加”和“统计”。在运行时,向Text1中输入字符,单击“添加”按钮后,则Text1中的内容作为一个列表项被添加到组合框的列表中;单击“统计”按钮,则在窗体上显示组合框中列表项的个数,如图23-3所示。请编写两个命令按钮的Click事件过程。
注意:程序中不得使用变量,也不能使用循环。存盘时必须存放在考生文件夹下,工程文件名为sjt3.vbp,窗体文件名为sjt3.frm。
(2) 在考生文件夹下有一个工程文件sjt4.vbp,其窗体如图23-4所示。该程序用来对在上面文本框中输入的英文字母串(称为“明文”)加密,加密结果(称为“密文”)显示在下面的文本框中。加密的方法是:选中一个单选按钮,单击“加密”按钮后,根据选中的单选按钮后面的数字n,把明文中的每个字母改为它后面的第n个字母(“z”后面的字母认为是“a”,“Z”后面的字母认为是“A”),如图所示。窗体中已经给出了所有控件和程序,但程序不完整,请去掉程序中的注释符,把程序中的?改为正确的内容。
注意:不能修改程序中的其他部分和控件的属性。最后把修改后的文件按原文件名存盘。
为了保护您的账号安全,请在“赏学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!