设组合框Combol中有3个项目,则下列能删除最后一项的语句是()。
A.Combo1.RemoveItem Text
B.Combo1.RemoveItem2
C.Combvo1.RemoveItem3
D.Combo1.RemoveItemCombo1.Listcount
A.Combo1.RemoveItem Text
B.Combo1.RemoveItem2
C.Combvo1.RemoveItem3
D.Combo1.RemoveItemCombo1.Listcount
设组合框Combol中有3个项目,则以下能删除最后一项的语句是______。
A.Combol. RemoveItem Text
B.Combol. RemoveItem 2
C.Combol. RemoveItem 3
D.Combol. RemoveItem Combol. Listcount
设组合框Combol中有3个列表项,为了删除其最后一项,应使用的语句是______。
A.Combol.RemoveItem Combo1. ListCount
B.Combol.RemoveItem 3
C.Combol.RemoveItem Combol. ListCount-1
D.Combol.RemoveItem Combol. Text
设组合框Combo1中有3个项目,则下列能删除最后一项的语句是()。
A.Combo1.RemoveItem Text
B.Combo1.RemoveItem 2
C.Combo1.RemoveItem 3
D.Combo1.RemoveItem Combo1. Listcount
A.Combo1.RemoveItem Text
B.Combo1.RemoveItem 2
C.Combo1.RemoveItem 3
D.Combo1.RemoveItem Combo1.Listeount
设组合框Combo1中有3个项目,则以下能删除最后一项的语句是______。
A.Combo1.RemoveItem Text
B.Combol.RemoveItem 2
C.Combo1.RemoveItem 3
D.Combol.RemoveItem Combol.Listcount
(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
程序的功能是 : 在组合框的编辑区中输入文本后按回车键 , 则检查列表中有无与此文本相同的项目 , 若有 ,则把编辑区中的文本删除,否则把编辑区中文本添加到列表的尾部。请填空。
A.Combo1.RemoveItem Combo1.Text
B.Combo1.Removeltem4
C.Combo1.RemoveItem Combo1.ListCount
D.Combo1.RemoveItem5
Private Sub Commandl Click()
If Not Check(Comb01.Text)Then
MsgBox(”输入错误”)
Exit Sub
End If
For k=0 TO Comb01.ListCount一1
If Comb01.Text=Comb01.List(k)Then
MsgBox(”添加项目失败”)
Exit Sub
End If
Next k
. Comb01.AddItem Comb01.Text
MsgBox(”添加项目成功”)
End Sub
Private Function Check(ch As String)As Boolean
n=Len(ch)
For k=1 Ton
c$=UCase(Mid(ch,k,1))
If c<“A”Or c>”Z”Then
Cbeck=False
Exit Function
End If
Next k
Check—True
End Function
程序运行时,如果在组合框的编辑区中输入“Java”,则单击命令按钮后产生的结果是
A.显示“输入错误”
B.显示“添加项目失败”
C.显示“添加项目成功”
D.没有任何显示