[問答題] 以下程序運行后的窗體如圖所示。其中組合框的名稱是Combo1，已有列表框如圖所示；命令按鈕的名稱是Command1。

Private Sub Command 1_Click()

If Not Check(Combo1. Text) Then

MsgBox("輸入錯誤")

Exit Sub

End If

For k=0 To Combo1. ListCount-1

If Combo1. Text=Combo1.List(k)Then

MsgBox("添加項目失敗")

Exit Sub

End If

Next k

Combo1. AddItem Combo1. Text

MsgBox("添加項目成功")

End Sub

Private Function Check(ch As String)As Boolean

n=Len(ch)

For k=1 To n

c$=UCase(Mid(ch, k, 1))

If c＜"A" Or c＞"Z" Then

Check=False

Exit Function

End If

Next k

Check=True

End Function

程序運行時。如果在組合框的編輯區(qū)中輸入“Java”，則單擊命令按鈕后產(chǎn)生的結(jié)果是( )。A 顯示“輸入錯誤”

B

正確答案：

B

參考解析：

本題程序的功能是：向組合框的文本輸入?yún)^(qū)輸入一個單詞，若其中含有非字母字符則利用消息框輸出“輸入錯誤”，若其已經(jīng)在組合框的列表項中存在則輸出“添加項目失敗”，否則將其加入到組合框的列表項中并顯示“添加項目成功”。