在窗體上有一個名稱為Check1的復(fù)選框數(shù)組(含4個復(fù)選框),還有一個名稱為Textl的文本框,初始內(nèi)容為
在窗體上有一個名稱為Check1的復(fù)選框數(shù)組(含4個復(fù)選框),還有一個名稱為Textl的文本框,初始內(nèi)容為空。程序運行時,單擊任何復(fù)選框,則把所有選中的復(fù)選框后面的文字羅列在文本框中(見圖)。下面能實現(xiàn)此功能的事件過程是? A. Private Sub Check1_click(Index As Integer) Text1.Text = "" For k = 0 To 3 If Check1(k).Value = 1 Then Text1.Text = Text1.Text & Check1(k).Caption & " "?'雙引號中是空格 End If Next k End Sub B. Private Sub Check1_Click(Index As Integer) For k = 0 To 3 If Check1(k).Value = 1 Then Text1.Text = Text1.Text & Check1(k).Caption & " " '雙引號中是空格 End If Next k End Sub C. Private Sub Check1_Click(Index As Integer) Text1.Text = "" For k = 0 To 3 If Check1(Index).Value = 1 Then Text1.Text = Text1.Text & Check1(Index).Caption & " " '雙引號中是空格 End If Next k End Sub D. Private Sub Check1_Click(Index As Integer) Text1.Text = "" For k = 0 To 3 If Check1(k).Value = 1 Then Text1.Text = Text1.Text & Check1(k).Caption & " " '雙引號中是空格 Exit For End If Next k End Sub?
正確答案:D
詞條內(nèi)容僅供參考,如果您需要解決具體問題
(尤其在法律、醫(yī)學(xué)等領(lǐng)域),建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。