以下程序運行后的窗體如圖所示。其中組合框的名稱是Combol,已有列表項如圖所示;命令按鈕的名稱是C
以下程序運行后的窗體如圖所示。其中組合框的名稱是Combol，已有列表項如圖所示；命令按鈕的名稱是Commandl。
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．沒有任何顯示
正確答案：B
詞條內容僅供參考，如果您需要解決具體問題
（尤其在法律、醫學等領域），建議您咨詢相關領域專業人士。