【正文】 串字符，以?結束，統(tǒng)計輸入字符中的39。 大、小寫字母和數(shù)字的個數(shù)。Private Sub Form_Click()Dim ch$, n1%, n2%, n3%n1 = 0n2 = 0n3 = 0ch = InputBox(請輸入一個字符)39。**********FILL**********Do While _____ Select Case ch Case a To z n1 = n1 + 139。**********FILL********** Case _____ n2 = n2 + 1 Case 0 To 9 n3 = n3 + 1 End Selectch = InputBox(請輸入一個字符)39。**********FILL********** _____Print n1, n2, n3答案 【學生答案】Do While _____【參考答案】do while ch?Do While ch?【學生答案】Case _____【參考答案】case A to ZCase A to Z【學生答案】_____【參考答案】loopLoop窗體設計1 在名稱為Form1的窗體上畫一個文本框，名稱為Txt1；再畫一個命令按鈕，名稱為C1，標題為移動，如圖1所示。請編寫適當?shù)氖录^程，使得在運行時，單擊移動按鈕，文本框水平移動到窗體的最左端如圖2所示。程序中不得使用任何變量。注意：完成題目后，必須保存工程后再關閉。 【控件】 標準答案：Name=C1 學生答案：Name=【控件屬性評分】 錯誤 【控件】 標準答案：Caption=移動 學生答案：Caption=【控件屬性評分】 錯誤 【控件】 標準答案：Name=Txt1 學生答案：Name=【事件評分】 錯誤 【事件】Private Sub C1_Click() 標準答案： = 0 學生答案：二 利用 VB設計上面的程序界面。窗體的標題為字體修改；其中包括一名稱為Label1,標題為請輸入文字的標簽； 一名稱為Text1，內容為空的文本框； 名稱為Command1,標題為隸書，名稱為Command2,標題為黑體的兩個命令按鈕。 程序功能： 單擊隸書命令按鈕時，文本框的字體設為隸書； 單擊黑體命令按鈕時，文本框的字體設置為黑體。提示：不能使用任何變量！ 【事件】Private Sub Command2_Click() 標準答案： = 黑體 學生答案：【控件屬性評分】 錯誤 【控件】 標準答案：Caption=隸書 學生答案：Caption=【事件評分】 錯誤 【事件】Private Sub Command1_Click() 標準答案： = 隸書 學生答案：【控件屬性評分】 錯誤 【控件】 標準答案：Caption=請輸入文字 學生答案：Caption= 三 在名稱為Form1的窗體上建立一個名稱為List1的列表框。要求：在程序運行后，通過Form_Load()事件過程加載窗體時， AAA，每當單擊某個列表項時， ，如圖所示。 【事件】Private Sub Form_Load() 標準答案： AAA 學生答案：【事件評分】 錯誤 【事件】Private Sub List1_Click() 標準答案： 四 在名稱為Form1的窗體上建立一個水平滾動條，名稱為HS1，其最大值為100，最小值為0。要求程序運行后，每次移動滾動框時， ，如圖所示（程序中不能使用任何變量） 【事件】Private Sub HS1_Scroll() 標準答案： Print 學生答案：【控件屬性評分】 錯誤 【控件】 標準答案：Name=HS1 學生答案：Name=【控件屬性評分】 錯誤 【控件】 標準答案：Max=100五 在名稱為Form1的窗體上建立一個名稱為l1的標簽，并設置他不可見；兩個名稱為cmd1和cmd2， 標題分別為顯示1和顯示2的命令按鈕。 編寫適當?shù)氖录^程，要求程序運行后， 如果單擊顯示1命令按鈕，則標簽可見并顯示字符串a(chǎn)aa； 如果單擊顯示2命令按鈕，則標簽可見并顯示字符串bbb。 程序中不能使用任何變量，直接顯示字符串；不能使用默認屬性。程序開始運行時界面如圖1所示 標準答案：Caption=顯示1 學生答案：Caption=【控件屬性評分】 錯誤 【控件】 標準答案：Visible=0 39。False 學生答案：Visible=【控件屬性評分】 錯誤 【控件】 標準答案：Name=l1 學生答案：Name=【控件屬性評分】 錯誤 【控件】 標準答案：Name=cmd2 學生答案：Name=【控件屬性評分】 錯誤 【控件】 標準答案：Name=cmd1 學生答案：Name=【事件評分】 錯誤 【事件】Private Sub cmd1_Click() 標準答案： = True = aaa 學生答案：【事件評分】 錯誤 【事件】Private Sub cmd2_Click() 標準答案： = bbb六 在名稱為Form1的窗體上畫一個文本框，名稱為Text1,且不可見；再畫兩個命令按鈕，名稱分別為c1和c2， 標題分別為隱藏和顯示。請編寫適當?shù)氖录^程，使得在運行時，如果單擊隱藏按鈕，則文本框消失； 如果單擊顯示按鈕，則文本框顯示出來，如圖1和圖2所示。程序中不得使用任何變量。 【控件屬性評分】 錯誤 【控件】 標準答案：Name=c2 學生答案：Name=【控件屬性評分】 錯誤 【控件】 標準答案：Caption=顯示 學生答案：Caption=【控件屬性評分】 錯誤 【控件】 標準答案：Name=c1 學生答案：Name=【控件屬性評分】 錯誤 【控件】 標準答案：Caption=隱藏 學生答案：Caption=【控件屬性評分】 錯誤 【控件】 標準答案：Visible=0 39。False 學生答案：Visible=【事件評分】 錯誤 【事件】Private Sub c2_Click() 標準答案： = True 學生答案：【事件評分】 錯誤 【事件】Private Sub c1_Click() 標準答案： = False 學生答案：七 標題為輸出的命令按鈕，如圖112所示。要求程序運行后，在文本框輸入幾個字符，單擊輸出按鈕，則在窗體上顯示文本框中的文字。 注意：在程序中不能使用任何變量，不能使用默認屬性。 控件屬性評分】 錯誤 【控件】 標準答案：Name=Cmd1 學生答案：Name=【控件屬性評分】 錯誤 【控件】 標準答案：Caption=輸出 學生答案：Caption=【事件評分】 錯誤 【事件】Private Sub Cmd1_Click() 標準答案： Print 學生答案：八 在名為Form1的窗體上畫一個框架，名稱為Frm1，標題為框架，高度為2500，寬度為4000，框架內建立一文本框，距左邊框600，距框架的上邊框1200，文本框中的初始內容設置為文本框，如圖所示。注意：完成試題后，必須保存，然后關閉窗口。 【控件屬性評分】 錯誤 【控件】 標準答案：Name=Frm1 學生答案：Name=【控件屬性評分】 錯誤 【控件】 標準答案：Height=2500 學生答案：Height=【控件屬性評分】 錯誤 【控件】 標準答案：Width=4000 學生答案：Width=【控件屬性評分】 錯誤 【控件】 標準答案：Left=600 學生答案：Left=【控件屬性評分】 錯誤 【控件】 標準答案：Text=文本框 學生答案：Text=【控件屬性評分】 錯誤 【控件】 標準答案：Top=1200 學生答案：Top=九 界面中窗體的標題為：密碼的顯示； 窗體中包括兩個文本框，他們的名稱分別為passtxt和showtxt,其中： passtxt用于密碼輸入，當在其中輸入信息時，顯示為*； showtxt文本框，在程序運行時不能用，只能顯示密碼。 具體功能： 程序運行時，當在文本框passtxt中輸入密碼時，showtxt中同時將輸入的內容原樣顯示。提示：不能使用任何變量，不能使用默認屬性！ 窗體屬性評分】 錯誤 【窗體】 標準答案：Caption=密碼的顯示 學生答案：Caption=Form1【控件屬性評分】 錯誤 【控件】 標準答案：Name=showtxt 學生答案：Name=【控件屬性評分】 錯誤 【控件】 標準答案：Enabled=0 39。False 學生答案：Enabled=【控件屬性評分】 錯誤 【控件】 標準答案：Name=passtxt 學生答案：Name=【控件屬性評分】 錯誤 【控件】 標準答案：PasswordChar=* 學生答案：PasswordChar=【事件評分】 錯誤 【事件】Private Sub passtxt_Change() 標準答案： = 學生答案：十 在名稱為Form1的窗體上建立一個名稱為Cmd1，標題為顯示的命令按鈕，編寫適當?shù)氖录^程。程序運行后，如果單擊顯示命令按鈕，則在窗體上顯示呵呵，小菜一碟！，如圖11所示。程序中不能使用任何變量，直接顯示字符串。注意：完成后必須保存，然后再關閉。 【控件屬性評分】 錯誤 【控件】 標準答案：Name=Cmd1 學生答案：Name=【控件屬性評分】 錯誤 【控件】 標準答案：Caption=顯示 學生答案：Caption=【事件評分】 錯誤 【事件】Private Sub Cmd1_Click() 標準答案： Print 呵呵，小菜一碟！ 學生答案：110 CABCD ACDDB 1120 DCBDB ACBBA 2130 DCDDA ABDDB3140 BDCBB DADCB 4150 CADAC BCDCD 5160 BACBC BAAAA6170CAAAD BBBCA 7180DACAD AACAD 8190DCDAD ADDCB91100CADDB ABBAC 101110CACCC AAAAB 111120DCDBA ADABD121130AAADA CBADB 131140DCDCA BADCC 141150ADADC DDDAD151CACCCDA