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