精選大一VB語言程序期末考試題及答案

1、大一VB語言程序期末考試題及答案大一VB語言程序設(shè)計(jì)期末考試題一、選擇題1 以下常量中，是Integer類型常量的是 C 。A、123& B、-38844 C、123% D、327682 下面選項(xiàng)中()是字符連接運(yùn)算符. A A、&B、AndC、%D、Mod3 下面關(guān)于VB的集成開發(fā)環(huán)境IDE的表達(dá)中，不正確的選項(xiàng)是 B 。A、IDE是設(shè)計(jì)、調(diào)試、運(yùn)行VB程序的工具。 B、用戶不能隨意關(guān)閉IDE中的窗口。C、窗體設(shè)計(jì) 窗口是用來設(shè)計(jì)應(yīng)用程序界面窗體的。 D、翻開 / 關(guān)閉各窗口的命令主要在IDE的視圖菜單中。4 len(“vb程序設(shè)計(jì))=( C ) 。A、 5 B、2 C、 6D、10 5 表

2、達(dá)式 15 Mod 4 + 13 5 * 2 的值是 DA、7B、0C、2D、46 賦值語句 A=123 + Mid$( “123456”,3,2) 執(zhí)行后，A= A 。A、157B、12334C、123 D、12334 7 在一個語句內(nèi)寫多條語句時,用來分隔每條語句的符號是(C).A、,B、;C、:D、8 將邏輯型數(shù)據(jù)轉(zhuǎn)換成整型數(shù)據(jù)時，轉(zhuǎn)換規(guī)那么是 D 。A、將True轉(zhuǎn)換為 1 ，將False轉(zhuǎn)換為 0B、將True轉(zhuǎn)換為 1 ，將False轉(zhuǎn)換為 -1 C、將True轉(zhuǎn)換為 0 ，將False轉(zhuǎn)換為 -1D、將True轉(zhuǎn)換為 -1 ，將False轉(zhuǎn)換為 0 9 表達(dá)式2+3*45-SIN

3、(X+1)/2中最先進(jìn)行的運(yùn)算是(D).A、SINB、45C、3*4D、x+110 如果x=2，那么表達(dá)式x+12 Or sin(x)0.9 And 3x+3的值 B 。A、不能計(jì)算B、 True C、5D、False11 隨機(jī)產(chǎn)生 10，50 之間整數(shù)的正確表達(dá)式是 D 。 A、Round( Rnd*50) B、 Int(Rnd*40+10)C、Round( Rnd*51) D、 10+Int(Rnd*41)12 每建立一個窗體,工程管理器窗口中就會增加一個(C).A、類模塊文件B、工程文件C、窗體文件D、程序模塊文件13 INT(100*RND(1)產(chǎn)生的隨機(jī)整數(shù)的閉區(qū)間是(B).A、1,

4、100B、0,99C、0,100D、1,9914 以下數(shù)據(jù)類型中,占用內(nèi)存最小的是(D).A、IntegerB、SingleC、BooleanD、Byte15 VisualBasic是一種()程序設(shè)計(jì)語言.BA、過程式B、非過程式C、機(jī)器D、低級16 函數(shù)Int(10*Rnd)是在(A)范圍內(nèi)的整數(shù). A、0,9B、0,1C、1,9D、1,1017 以下合法的一組Visual Basic用戶標(biāo)識符是 CA、Sum 和 8abcB、a#x 和 PiC、ForLoop 和 TotalD、Const 和 DoWhile18 函數(shù)Len(Str(Val(123.4)的值為(B).A、5B、6C、8D、

5、1119 Int(198.555*100+0.5)/100的值為BA、199.6B、198.56C、200D、19820 以下各表達(dá)式中, 計(jì)算結(jié)果為0的是(A).A、FIX(12.4)+FIX(-12.6)B、CINT(12.4)+CINT(-12.6)C、INT(12.4)+INT(-12.6)D、FIX(13.6)+FIX(-12.6)21 MsgBox()的正確語法是 D 。A、 MsgBox(標(biāo)題 ，提示信息 ，按鈕類型)B、 MsgBox(提示信息，標(biāo)題 ，按鈕類型)C、MsgBox(標(biāo)題 ，按鈕類型 ，提示信息)D、 MsgBox(提示信息 ，按鈕類型 ，標(biāo)題)22 38-3 O

6、R 10+2 5,-1,0)后,x的值為(D).A、5B、0C、6D、-125 下面關(guān)于VB的表達(dá)中，不正確的選項(xiàng)是 A 。A、用VB編寫的程序可以在任何操作系統(tǒng)環(huán)境中運(yùn)行。B、VB是面向?qū)ο蟮目梢暬能浖_發(fā)工具。C、VB是在20世紀(jì)60年代美國Dartmouth學(xué)院開發(fā)的Basic語言根底上開展而形成的。 D、VB是由美國Microsoft微軟公司開發(fā)程序設(shè)計(jì)語言。26 表達(dá)式16 / 4-25*8 / 4 Mod 5 2 = ( A )。A、4 B、0C、-2 D、 -627 聲明符號常量應(yīng)該用關(guān)鍵字(B).A、PrivateB、ConstC、StaticD、V26/ariant28 以

7、下數(shù)據(jù)類型中,占用內(nèi)存最大的是(D).A、BooleanB、IntegerC、ByteD、Single29 以下VB數(shù)據(jù)類型中，占用內(nèi)存最少的是 D 。A、CurrencyB、Integer C、Boolean D、Byte 30 RGB 函數(shù)通過紅.綠.藍(lán)三基色混合產(chǎn)生某種顏色,某語法為RGB(紅.綠.藍(lán)),括號中紅、綠、藍(lán)三基色的成分使用0255之間的整數(shù).假設(shè)使用三個滾動條分別輸入三種基色,為保證輸入數(shù)值有效,那么應(yīng)設(shè)置(B)屬性.A、Scroll和ChangeB、Max和MinC、Smallchange和 LargeChangeD、Value31 k=12.5 ，len( str( k

8、 ) )=( B ) 。 A、 4 B、5 C、 3 D、 232 表達(dá)式Abs(-5)*55/5的值是 DA、1B、5C、-25D、2533 產(chǎn)生10,37之間的隨機(jī)整數(shù)的VisualBasic表達(dá)式是(C).A、Int(Rnd(1)*27)+11B、Int(Rnd(1)*28)+11C、Int(Rnd(1)*28)+10D、In t(Rnd(1)*27)+1034 工具欄中的啟動按鈕的作用是(B).A、工程管理窗口B、運(yùn)行一個應(yīng)用程序C、翻開被選中對象的代碼窗口D、運(yùn)行一個窗體35 不需要編譯，計(jì)算機(jī)便可直接執(zhí)行的程序是 B 。 A、C語言程序B、 機(jī)器語言程序C、 匯編語言程序 D、 V

9、isual Basic語言程序 36 Val (“123ab)= D 。 A、0 B、 不能轉(zhuǎn)換C、1230 D、123 37 表達(dá)式16/4-25*8/4MOD52的值為 AA、4B、2C、14D、2038 刪除字符串前導(dǎo)和尾隨空格的函數(shù)是(D).A、Rtrim( )B、Ltrim()C、LcaseD、Trim()39 以下表達(dá)式中,其值為0的是(C).A、15 mod 9B、7/9C、79D、7 mod 1540 表達(dá)式Len(123程序設(shè)計(jì)ABC)的值是 BA、17B、10C、14D、2041 Int(-3.1)+round (-4.6)=_C_。 A、-8B、-6 C、-9 D、-7

10、42 、/、Mod、*等4個算術(shù)運(yùn)算符中,優(yōu)先級最低的是(A).A、ModB、/C、*D、43 下面正確的賦值語句是 D 。A、x=y=1 B、x+2=y2+2C、x+y=1 D、x=y+z1 44 Len(實(shí)踐應(yīng)用能力)的值是(A).A、6B、4C、不能確定D、845 表達(dá)式Mid(SHANGHAI,6,3)的值是(C).A、ANGHB、SHAC、HAID、SHANGH46 表達(dá)式253 mod 3 *Int(4.5)的值為(B).A、1B、8C、4D、547 下面變量名稱正確的選項(xiàng)是 C 。A、x 1 B、integer C、 x_1_y D、 x , y48 不能正確表示條件兩個整型變量

11、A和B之一為0,但不能同時為0的布爾表達(dá)式(D).A、A*B=0ANDABB、(A=0ORB=0)ANDABC、A=0ANDB0ORA0AND B=0D、A*B=0AND(A=0ORB=0)49 如果X是一個正的實(shí)數(shù),將千分位四舍五入,保存兩位小數(shù)的表達(dá)式是(C).A、0.01*int(100*(x+0.05)B、0.01*int(x+0.05)C、0.01*int(100*(x+0.005)D、0.01*int(x+0.005)50 表達(dá)式X+1X是(D).A、非法表達(dá)式B、字符表達(dá)式C、算術(shù)表達(dá)式D、關(guān)系表達(dá)式51VisualBasic的編程機(jī)制是(B).A、面向圖形B、事件驅(qū)動C、面向?qū)?/p>

12、象D、可視化52 下面4項(xiàng)中合法的變量名是(A).A、X_yzB、X-YC、123abcD、integer53 以下可以作為VB變量名的是(C).A、COS(X)B、X(-1)C、CO1D、SIN54 表達(dá)式(73+1)*(185-1)的值是(B).A、8.76B、6C、6.67D、7.855 以下哪個變量名的取法是不正確的(C).A、sTmeB、T_12C、T12%D、T_Temp56 可以同時刪除字符串前導(dǎo)和尾部空白的函數(shù)是(B).A、LtrimB、TrimC、MidD、Rtrim57 VB窗體文件的擴(kuò)展名是(A).A、FRMB、VBWC、VBPD、BAS58 一個具有圖形用戶界面的“標(biāo)準(zhǔn)

13、EXE工程必須包含的文件是 A 。 A、工程文件和窗體文件。 B、窗體文件和標(biāo)準(zhǔn)模塊文件。C、工程文件和資源文件。D、工程文件和標(biāo)準(zhǔn)模塊文件。59 數(shù)學(xué)式3X5寫成VB表達(dá)式是 A 。A、3=X and X=3 and 5XC、3=X or X5D、3=XA and Ucase$(C$)=0 AND a+cb+3 OR NOT d的值是_false_。4.表示x是5的倍數(shù)或是9的倍數(shù)的邏輯表達(dá)式為_x mod 5 = 0 OR x mod 9 = 0_。5.在剛建立工程時，使窗體上的所有控件具有相同的字體格式，就對_font_的屬性進(jìn)行設(shè)置。6.Int(-2.6)、Int(2.6)、Fix(-

14、2.6)、Fix(3.6)的值分別是_-3_、_2_、_-2_、_3_。7.Label和TextBox控件用來顯示和輸入文本，如果僅需要讓應(yīng)用程序在窗體中顯示文本信息，可使用_label_控件；假設(shè)允許用戶輸入文本，那么應(yīng)使用_Textbox_控件。8.假設(shè)命令按鈕的名稱為Cmdopen，程序要求單擊該命令按鈕時，翻開一個窗口frm1，請對以下事件過程填空。Private Sub Cmdopen_Click()_frm1.show_end sub9.表達(dá)式93 7 Mod 2 2 的值是_1_。10.表達(dá)式Ucase(Mid(“abcdefgh,3,4)的值是_CDEF_。11.當(dāng)程序運(yùn)行時，

15、要求窗體中的文本框呈現(xiàn)空白，那么在設(shè)計(jì)時，應(yīng)當(dāng)在此文本框的_屬性_窗口中，把此文本框的_text_屬性設(shè)置成空白。12.a=3，b=4，c=5，表達(dá)式ab and Not ca Or cb And ca And Not b 3000Print 從1 到:; i; 的和是; sEnd Sub答案 【學(xué)生答案】i = i + 2【參考答案】i=i+12. -【程序改錯】-862題目：以下程序段用于輸出100-300的所有素?cái)?shù)-Option ExplicitPrivate Sub Form_Click()Dim n As Integer, k As Integer, i As Integer, sw

16、it As IntegerFor n = 101 To 300 Step 2 k = Int(Sqr(n) i = 2*ERROR* swit = 1*ERROR* While swit = 0 If n Mod i = 0 Then swit = 1 Else*ERROR* i = i - 1 End If WendIf swit = 0 Then Print n;End IfNext nEnd Sub答案 【學(xué)生答案】swit = 1【參考答案】swit=0【學(xué)生答案】While swit = 0【參考答案】While i=i And swit=0 While swit=0 And i=i

17、【學(xué)生答案】i = i - 1【參考答案】i=i+13.Option ExplicitPrivate Sub Form_Click()Dim i As Integer, j As Integer, k As IntegerPrint Tab(30); 9*9 tablePrint: PrintPrint * ;For i = 1 To 9*ERROR* Print Tab(i * 6); iNext iPrintFor j = 1 To 9 Print j; ; For k = 1 To j Print Tab(k * 6); j * k; ; *ERROR* Next j Print*ERR

18、OR*Next k答案 【學(xué)生答案】Print Tab(i * 6); i【參考答案】 Print Tab(i * 6); i;【學(xué)生答案】Next j【參考答案】 Next k【學(xué)生答案】Next k【參考答案】Next j4.-【程序改錯】-題目：以下程序段用于計(jì)算5的N次方。-Option ExplicitPrivate Sub Form_Click() Dim n As Integer, k As Integer, s As Long n = InputBox( Input n )*ERROR* k = 0*ERROR* s = 0 Do While k = n s = s * 5 k

19、 = k + 1*ERROR* Next Print 5的; n次方是; sEnd Sub答案 【學(xué)生答案】k = 0【參考答案】k=1【學(xué)生答案】s = 0【參考答案】s=1【學(xué)生答案】Next【參考答案】loop-5.【程序改錯】-題目：以下程序段用于打印如圖1所示的九九乘法表：-Option ExplicitPrivate Sub Form_Click()Dim i As Integer, j As Integer, k As IntegerPrint Tab(30); 9*9 tablePrint: PrintPrint * ;For i = 1 To 9*ERROR* Print T

20、ab(i * 6); iNext iPrintFor j = 1 To 9 Print j; ;*ERROR* For k = 1 To 9*ERROR*Print Tab(j * 6); j * k; ; Next k PrintNext jEnd Sub答案 【學(xué)生答案】Print Tab(i * 6); i【參考答案】Print Tab(i*6);i;【學(xué)生答案】For k = 1 To 9【參考答案】For k = 1 To j【學(xué)生答案】Print Tab(j * 6); j * k; ;【參考答案】Print Tab(k*6);j*k; ;6.【程序改錯】-題目：下面程序可輸出如以

21、下圖形： * * * * *-Option ExplicitPrivate Sub Form_Click()Dim m As Integer, n As Integer, s As String, i As Integer, j As Integern = 4m = 1s = *For i = 5 To 1 Step -1 *ERROR* Print Spc(n) For j = 1 To 2 * m - 1 Print s; Next j Print *ERROR* n = n + 1 *ERROR* m = m - 1Next i答案 【學(xué)生答案】Print Spc(n)【參考答案】Pri

22、nt Spc(n);Print Spc(i);?Spc(n);?Spc(i);【學(xué)生答案】n = n + 1【參考答案】n=n-1n=-1+n【學(xué)生答案】m = m - 1【參考答案】m=m+17.題目：以下程序段用于輸出100-300的所有素?cái)?shù)-Option ExplicitPrivate Sub Form_Click()Dim n As Integer, k As Integer, i As Integer, swit As IntegerFor i = 101 To 299 k = Int(Sqr(i) For n = 2 To k If i Mod n = 0 Then *ERROR*

23、 Exit End If Next n *ERROR* If n k Then Print i; End If*ERROR*Next nPrint i答案 【學(xué)生答案】Exit【參考答案】exit for【學(xué)生答案】If n k ThenIf kn Then【學(xué)生答案】Next n【參考答案】next iNext i程序填空1.從鍵盤輸入三個整數(shù)，從其中找出最大值并輸出到窗口Private Sub Form_Click()Dim a%, b%, c%, max%a = Val(InputBox(請輸入一個整數(shù))b = Val(InputBox(請輸入一個整數(shù))c = Val(InputBox(

24、請輸入一個整數(shù))max=a*FILL*If _Then max=bEnd IfIf max c Then*FILL* _End If*FILL*Print a; 、; b; 、; c; 中最大值是;_End Sub答案 【學(xué)生答案】If _Then【參考答案】maxbmaxmaxb=max【學(xué)生答案】_【參考答案】max=c【學(xué)生答案】Print a; 、; b; 、; c; 中最大值是;_【參考答案】max2.以下程序的功能。Private Sub Form_Click()Dim a%, b%, c%, d!Dim x1, x2Dim p, q, ra = InputBox(請輸入a的值)b

25、 = InputBox(請輸入b的值)c = InputBox(請輸入c的值)d = b * b - 4 * a * cp = -b / (2 * a)If d = 0 Then*FILL* If _ Then r = Sqr(d) / (2 * a) x1 = p + r x2 = p - r Else x1 = p x2 = p*FILL* _ Print x1=; x1, x2=; x2*FILL*_ q = Sqr(-d) / (2 * a) Print x1=; p; +; q; i, x2=; p; -; q; iEnd If答案 【學(xué)生答案】If _ Then【參考答案】d0【學(xué)

26、生答案】_【參考答案】End ifEnd Ifend if【學(xué)生答案】_【參考答案】elseElseELSE3.從鍵盤輸入學(xué)生分?jǐn)?shù)，統(tǒng)計(jì)學(xué)生總?cè)藬?shù)和各分?jǐn)?shù)段人數(shù)，即優(yōu)秀90-100、良好80-89、中等70-79、 及格60-69、不及格60以下的人數(shù)。Private Sub Form_Click()Dim score%, n1%, n2%, n3%, n4%, n5%msg = 請輸入分?jǐn)?shù)-1結(jié)束msgtitile = 輸入數(shù)據(jù)score = Val(InputBox(msg, msgtitle)*FILL*While _ total = total + 1*FILL* Select Cas

27、e _ Case Is = 90 n1 = n1 + 1 Case Is = 80 n2 = n2 + 1 Case Is = 70 n3 = n3 + 1 Case Is = 60 n4 = n4 + 1 Case Else n5 = n5 + 1*FILL* _score = Val(InputBox(msg, msgtitle)WendPrint n1, n2, n3, n4, n5, totalEnd Sub答案 【學(xué)生答案】While _【參考答案】score=0 and score=0 and score=100score-1【學(xué)生答案】Select Case _【參考答案】sco

28、re【學(xué)生答案】_【參考答案】End Select4以下程序段用于實(shí)現(xiàn)：輸入兩個正整數(shù)m和n，求其最大公因數(shù)和最小公倍數(shù)。Private Sub Form_Click()Dim a%, b%, num1%, num2%, tempnum1 = InputBox(請輸入一個正整數(shù))num2 = InputBox(請輸入一個正整數(shù))*FILL*If _ Then temp = num1: num1 = num2: num2 = tempEnd Ifa = num1b = num2*FILL*Do While _ temp = a Mod b a = b*FILL* _LoopPrint 最大公因數(shù)

29、為：; aPrint 最小公倍數(shù)為：; num1 * num2 / a答案 【學(xué)生答案】If _ Then【參考答案】num1num1【學(xué)生答案】Do While _【參考答案】b0b00btemp0temp00tempNot b=0Not 0=b【學(xué)生答案】_【參考答案】b=temp5以下程序用于判斷一個正整數(shù)3是否為素?cái)?shù)。Private Sub Form_Click()n = InputBox(請輸入一個正整數(shù)3)k = Int(Sqr(n)i = 2swit = 0*FILL*Do While i = k And _*FILL*If _ Then swit = 1Else*FILL* _

30、End IfLoopIf swit = 0 Then Print n; 是一個素?cái)?shù)Else Print n; 不是素?cái)?shù)End IfEnd Sub答案 【學(xué)生答案】Do While i = k And _【參考答案】swit=0【學(xué)生答案】If _ Then【參考答案】n Mod i = 0n i = n / in / i = int ( n / i)【學(xué)生答案】_【參考答案】i = i + 16題目：從鍵盤上輸入一串字符，以?結(jié)束，統(tǒng)計(jì)輸入字符中的 大、小寫字母和數(shù)字的個數(shù)。Private Sub Form_Click()Dim ch$, n1%, n2%, n3%n1 = 0n2 = 0n3

31、 = 0ch = InputBox(請輸入一個字符)*FILL*Do While _ Select Case ch Case a To z n1 = n1 + 1*FILL* Case _ n2 = n2 + 1 Case 0 To 9 n3 = n3 + 1 End Selectch = InputBox(請輸入一個字符)*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è)

32、計(jì)1 在名稱為Form1的窗體上畫一個文本框，名稱為Txt1；再畫一個命令按鈕，名稱為C1，標(biāo)題為移動，如圖1所示。請編寫適當(dāng)?shù)氖录^程，使得在運(yùn)行時，單擊移動按鈕，文本框水平移動到窗體的最左端如圖2所示。程序中不得使用任何變量。注意：完成題目后，必須保存工程后再關(guān)閉。 【控件】VB.CommandButton_ 標(biāo)準(zhǔn)答案：Name=C1 學(xué)生答案：Name=【控件屬性評分】錯誤 【控件】VB.CommandButton_ 標(biāo)準(zhǔn)答案：Caption=移動 學(xué)生答案：Caption=【控件屬性評分】錯誤 【控件】VB.TextBox_ 標(biāo)準(zhǔn)答案：Name=Txt1 學(xué)生答案：Name=【事件評分

33、】錯誤 【事件】Private Sub C1_Click() 標(biāo)準(zhǔn)答案： Txt1.Left = 0 學(xué)生答案：二 1、 利用 VB設(shè)計(jì)上面的程序界面。窗體的標(biāo)題為字體修改；其中包括一名稱為Label1,標(biāo)題為請輸入文字的標(biāo)簽； 一名稱為Text1，內(nèi)容為空的文本框； 名稱為Command1,標(biāo)題為隸書，名稱為Command2,標(biāo)題為黑體的兩個命令按鈕。 2、程序功能： 單擊隸書命令按鈕時，文本框的字體設(shè)為隸書； 單擊黑體命令按鈕時，文本框的字體設(shè)置為黑體。提示：不能使用任何變量！ 【事件】Private Sub Command2_Click() 標(biāo)準(zhǔn)答案： Text1.Font = 黑體 學(xué)

34、生答案：【控件屬性評分】錯誤 【控件】VB.CommandButton_ 標(biāo)準(zhǔn)答案：Caption=隸書 學(xué)生答案：Caption=【事件評分】錯誤 【事件】Private Sub Command1_Click() 標(biāo)準(zhǔn)答案： Text1.Font = 隸書 學(xué)生答案：【控件屬性評分】錯誤 【控件】VB.Label_ 標(biāo)準(zhǔn)答案：Caption=請輸入文字 學(xué)生答案：Caption= 三 在名稱為Form1的窗體上建立一個名稱為List1的列表框。要求：在程序運(yùn)行后，通過Form_Load()事件過程加載窗體時，執(zhí)行語句List1.AddItem AAA，每當(dāng)單擊某個列表項(xiàng)時，都執(zhí)行語句List

35、1.AddItem List1.Text一次，如下圖。 【事件】Private Sub Form_Load() 標(biāo)準(zhǔn)答案： List1.AddItem AAA 學(xué)生答案：【事件評分】錯誤 【事件】Private Sub List1_Click() 標(biāo)準(zhǔn)答案： List1.AddItem List1.Text 四 在名稱為Form1的窗體上建立一個水平滾動條，名稱為HS1，其最大值為100，最小值為0。要求程序運(yùn)行后，每次移動滾動框時，都執(zhí)行語句Form1.Print HS1.Value，如下圖程序中不能使用任何變量 【事件】Private Sub HS1_Scroll() 標(biāo)準(zhǔn)答案： Prin

36、t HS1.Value 學(xué)生答案：【控件屬性評分】錯誤 【控件】VB.HScrollBar_ 標(biāo)準(zhǔn)答案：Name=HS1 學(xué)生答案：Name=【控件屬性評分】錯誤 【控件】VB.HScrollBar_ 標(biāo)準(zhǔn)答案：Max=100五 1、在名稱為Form1的窗體上建立一個名稱為l1的標(biāo)簽，并設(shè)置他不可見；兩個名稱為cmd1和cmd2， 標(biāo)題分別為顯示1和顯示2的命令按鈕。 2、編寫適當(dāng)?shù)氖录^程，要求程序運(yùn)行后， 如果單擊顯示1命令按鈕，那么標(biāo)簽可見并顯示字符串a(chǎn)aa； 如果單擊顯示2命令按鈕，那么標(biāo)簽可見并顯示字符串bbb。 程序中不能使用任何變量，直接顯示字符串；不能使用默認(rèn)屬性。程序開始運(yùn)行

37、時界面如圖1所示 標(biāo)準(zhǔn)答案：Caption=顯示1 學(xué)生答案：Caption=【控件屬性評分】錯誤 【控件】VB.Label_ 標(biāo)準(zhǔn)答案：Visible=0 False 學(xué)生答案：Visible=【控件屬性評分】錯誤 【控件】VB.Label_ 標(biāo)準(zhǔn)答案：Name=l1 學(xué)生答案：Name=【控件屬性評分】錯誤 【控件】VB.CommandButton_ 標(biāo)準(zhǔn)答案：Name=cmd2 學(xué)生答案：Name=【控件屬性評分】錯誤 【控件】VB.CommandButton_ 標(biāo)準(zhǔn)答案：Name=cmd1 學(xué)生答案：Name=【事件評分】錯誤 【事件】Private Sub cmd1_Click()

38、標(biāo)準(zhǔn)答案： l1.Visible = True l1.Caption = aaa 學(xué)生答案：【事件評分】錯誤 【事件】Private Sub cmd2_Click() 標(biāo)準(zhǔn)答案： l1.Caption = bbb六 1、在名稱為Form1的窗體上畫一個文本框，名稱為Text1,且不可見；再畫兩個命令按鈕，名稱分別為c1和c2， 標(biāo)題分別為隱藏和顯示。2、請編寫適當(dāng)?shù)氖录^程，使得在運(yùn)行時，如果單擊隱藏按鈕，那么文本框消失； 如果單擊顯示按鈕，那么文本框顯示出來，如圖1和圖2所示。程序中不得使用任何變量。 【控件屬性評分】錯誤 【控件】VB.CommandButton_ 標(biāo)準(zhǔn)答案：Name=c2

39、 學(xué)生答案：Name=【控件屬性評分】錯誤 【控件】VB.CommandButton_ 標(biāo)準(zhǔn)答案：Caption=顯示 學(xué)生答案：Caption=【控件屬性評分】錯誤 【控件】VB.CommandButton_ 標(biāo)準(zhǔn)答案：Name=c1 學(xué)生答案：Name=【控件屬性評分】錯誤 【控件】VB.CommandButton_ 標(biāo)準(zhǔn)答案：Caption=隱藏 學(xué)生答案：Caption=【控件屬性評分】錯誤 【控件】VB.TextBox_ 標(biāo)準(zhǔn)答案：Visible=0 False 學(xué)生答案：Visible=【事件評分】錯誤 【事件】Private Sub c2_Click() 標(biāo)準(zhǔn)答案： Text1.

40、Visible = True 學(xué)生答案：【事件評分】錯誤 【事件】Private Sub c1_Click() 標(biāo)準(zhǔn)答案： Text1.Visible = False 學(xué)生答案：七 標(biāo)題為輸出的命令按鈕，如圖1-12所示。要求程序運(yùn)行后，在文本框輸入幾個字符，單擊輸出按鈕，那么在窗體上顯示文本框中的文字。 注意：在程序中不能使用任何變量，不能使用默認(rèn)屬性。 控件屬性評分】錯誤 【控件】VB.CommandButton_ 標(biāo)準(zhǔn)答案：Name=Cmd1 學(xué)生答案：Name=【控件屬性評分】錯誤 【控件】VB.CommandButton_ 標(biāo)準(zhǔn)答案：Caption=輸出 學(xué)生答案：Caption=【事件評分】錯誤 【事件】Private Sub Cmd1_Click() 標(biāo)準(zhǔn)答案： Print Text1.Text 學(xué)生答案：八 在名為Form1的窗體上畫一個框架，名稱為Frm1，標(biāo)題為框架，高度為2500，寬度為4000，框架內(nèi)建立一文本框，距左邊框600，距框架的上邊框1200，文本框中的初始內(nèi)容設(shè)置為文本框，如下圖。注意：完成試題后，必須保存，然后關(guān)閉窗口。 【控件屬性評分】錯誤 【控件】VB.Frame_ 標(biāo)準(zhǔn)答案：Name=Frm1 學(xué)生答案：Name=【控件屬性評分】錯誤 【控件】VB.Frame_ 標(biāo)準(zhǔn)答案：Height=2500 學(xué)生答案：Height=【控件屬