17.編寫VB程序,功能如下:在文本框Text1中輸入由字母和數(shù)字組成的字符串,單擊“顯示”按鈕,在列表框中輸出由其中的大寫字母所形成的一個的三角形,依次是第1行1個大寫字
母,第2行2個大寫字母……(最后第x行可能不足x個字母)。運行界面如圖。
(1)觀察程序代碼,該代碼中Command1_Click是
(單選:A.對象名/B.事件名/C.事件處理過程名)
(2)實現(xiàn)上述功能請在橫線處填入合適的代碼。
PrivateSubCommand1_Click ( ?。?br />DimsAsString,chAsString,lineAsString
DimiAsInteger,nAsInteger,cAsInteger
s=Text1.Text
n=
①c=1:line=″″
Fori=1Ton
ch=Mid(s,i,1)
Ifch>=″A″
②Then
line=line+ch
IfLen(line)Modc=0Then
List1.AddItemline
③line=″″
EndIf
EndIf
Nexti
Ifline<>““ThenList1.AddItemline'④
EndSub
(3)上述程序段刪除④處加下劃線的語句后,在文本框Text1中輸入“ABCDE”(不含引號),單擊“顯示”按鈕,List1列表框顯示的最后一行內(nèi)容是
。