[單項(xiàng)選擇題] 在窗體上畫一個(gè)文本框Text1、一個(gè)標(biāo)簽Label1和一個(gè)命令按鈕Command1，然后編寫如下兩個(gè)事件過程：

Private Sub Command1_Click()

a=InputBox("請輸入一個(gè)字符串")

Text1．Text=a

End Sub

Private Sub Textl_Change()

Label1．Caption=UCase(Mid(Text1．Text，8))

End Sub

程序運(yùn)行后，單擊命令按鈕，將顯示一個(gè)輸入對話框，如果在該對話框中輸入字符串“Visual Basic”，則在標(biāo)簽中顯示的內(nèi)容是

A．visual basic

B．VISUAL BASIC

C．basic

D．BASIC

D解析：[分析]： 本題包括兩個(gè)事件過程，其中命令按鈕事件過程通過對話框輸入一個(gè)字符串，并將該字符串賦給文本框。而當(dāng)改變文本框的內(nèi)容時(shí)，將觸發(fā)文本框的Change事件。因此，在將輸入的字符串賦給文本框時(shí)，將執(zhí)行文本框的Change事件過程，對標(biāo)簽的Caption屬性賦值，該值是：首先取出文本框中第8個(gè)字符之后的全部字符，然后將它們轉(zhuǎn)換為大寫字母。由于文本框中的字符串為“Visual Basic”，第8個(gè)字符為“B”，它之后的字符為“Basic”，執(zhí)行UCase函數(shù)后，轉(zhuǎn)換為大寫，即“BASIC”。