题目内容
（请给出正确答案）
A.GROUPBY
B.ORDERBY
C.INTOTABLE
D.INTOCURSOR
如果结果不匹配，请 联系老师 获取答案
更多“如果Combol对象的RowSourceType设置为3，则…”相关的问题
设组合框Combol中有3个列表项，为了删除其最后一项，应使用的语句是______。
A．Combol.RemoveItem Combo1. ListCount
B．Combol.RemoveItem 3
C．Combol.RemoveItem Combol. ListCount-1
D．Combol.RemoveItem Combol. Text
A.Combo1.RemoveItem Text
B.Combo1.RemoveItem2
C.Combvo1.RemoveItem3
D.Combo1.RemoveItemCombo1.Listcount
A.Combo1.RemoveItem Combo1.Text
B.Combo1.Removeltem4
C.Combo1.RemoveItem Combo1.ListCount
D.Combo1.RemoveItem5
设组合框Combol中有3个项目，则以下能删除最后一项的语句是______。
A．Combol. RemoveItem Text
B．Combol. RemoveItem 2
C．Combol. 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
程序的功能是 ： 在组合框的编辑区中输入文本后按回车键 ， 则检查列表中有无与此文本相同的项目 ， 若有 ，则把编辑区中的文本删除，否则把编辑区中文本添加到列表的尾部。请填空。
通过选择组合框中的选项来改变文本框的字体。在窗体中添加一个组合框 (Combo1)和一个文本框(Text1)，代码如下。请填入适当的内容，将程序补充完整。
Private Sub Combo1_Cliek()
TextFontName=ComboList(ComboListlndex)
End Sub
Private Sub Form_Load()
With Combol
Addltem"宋体"
Addltem"隶书"
Addltem"黑体"
&8226;Addltem"楷体_GB2312""
&8226;Listlndex＝0
End With
Text1.【 】30
Textl. 【 】=Combol.List(0)
End Sub
.jpg)
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．没有任何显示
