VB綜合復(fù)習(xí)題

1、綜合復(fù)習(xí)題一、選擇題1. 以下敘述中，錯(cuò)誤的是_。A. VB是事件驅(qū)動(dòng)型可視化編程工具B. VB窗體文件包含該窗體及其控件的屬性，窗體級的常量、變量的定義等C. VB工具箱中的所有控件都具有寬度（Width）和高度（Height）屬性D. VB中控件的某些屬性只能在運(yùn)行時(shí)修改2以下說法中，錯(cuò)誤的是         。A. 方法是構(gòu)成對象實(shí)體的一個(gè)部分B. 方法是一種特殊的過程或函數(shù)C. 調(diào)用方法的一般格式是：對象名.方法名 參數(shù)D. 圖片框和列表框均可執(zhí)行Cls方法3以下敘述中，錯(cuò)誤的是  &#

2、160;        。A在VB中，對象所能響應(yīng)的事件是由系統(tǒng)定義的B對象的任何屬性既可以通過屬性窗口設(shè)定，也可以通過程序語句設(shè)定CVB中不同對象可具有名稱相同的方法DVB中的對象具有自己的屬性4在Visual Basic中，每個(gè)對象一般都能感知和接收多個(gè)不同的事件，并能對這些事件作出響應(yīng)，其響應(yīng)方式就是通過調(diào)用執(zhí)行一個(gè)與之相對應(yīng)的         來實(shí)現(xiàn)的。A事件過程      &#

3、160;      B通用過程C主程序               DSub Main過程5下列選項(xiàng)中，不能使控件獲得焦點(diǎn)的操作是            。A在程序運(yùn)行期間，用鼠標(biāo)單擊對象B在程序運(yùn)行期間，用快捷鍵選擇對象C在程序運(yùn)行期間，用Tab鍵D在程序運(yùn)行期間，用Enter鍵6以下合法的VB標(biāo)

4、識(shí)符是           。    AForLoop           BConst         C9abc        Da#x7下面四組均為正確的VB常量是    &

5、#160;        。A. 3276，123.56，1.2E-2，#True# B. -32768，1.34D2，"ABCDE"，25！C. &HABCE，02-03-2002，F(xiàn)alse，D-3DABCDE，#02-02-2002#，E-28下列表達(dá)式中，值為True的是            。A3<2<1BUcase("vb")>=Lcas

6、e("VB")CMid("vbprogram", 2, 2) > Left("vbprogram", 2)D14 / 2 3 > 10 Mod 49以下表達(dá)式的值為True的是_。A. Str(23.45)=Trim(" 23.45")B. Sgn(7 Mod 3 - 4)+ "-0.25" = -1.25C. Fix(3.5)+Cint(2.5)=6D. "it is true" = "It is true "10以下關(guān)系表達(dá)式中，其值為Fa

7、lse的是           。    A"VISUAL" = UCase("Visual")      B"the" <> "they"    C "ABC" > "AbC"      &

8、#160;           D"Integer" > "Int"11設(shè)a=2, b=3, c=4, 下列表達(dá)式的值是           。Not a<=c Or 4*c=b2 And b<>a+cA-1      B1      

9、CTrue      DFalse12數(shù)學(xué)表達(dá)式|e3+lnX+arctgY|對應(yīng)的VB表達(dá)式是            。AAbs(e 3 + Log(X) + 1 / Atn(Y)BAbs(Exp(3) + Log(X) / Log(10) + Atn(Y)CAbs(Exp(3) + Log(X) + 1 / Atn(Y)DAbs(Exp(3) + Log(X) + Atn(Y)13數(shù)學(xué)表達(dá)式，對應(yīng)的VB算術(shù)表達(dá)式為_。A. (12*

10、x+5*y-Sqr(Abs(d3-m2)/Exp(-x)/Sin(x)B. (12*x+5*y-Sqr(Abs(d3-m2)/Exp(-x)*Sin(x)C. (12*x+5*y-Sqr(Abs(d3-m2)/Exp(-x)/Sin(x)D. (12*x+5*y-Sqr(Abs(d3-m2)/e(-x)/Sin(x)14表達(dá)式4+56*7/8的結(jié)果為_。A. 4             B. 5       

11、0;          C. 6             D. 715只能用于除去字符串右側(cè)空格的函數(shù)是            。ARightTrim      BRTrim       C

12、Trim         DRLTrim16執(zhí)行語句 Print Sgn(Fix(3.1) + Int(-3.1) ，在窗體上輸出的結(jié)果是            。A1         B0         C-1   

13、      D617下列語句不能正常執(zhí)行的是            。APrint 20 + 5 = 25          BPrint "11" + 11CPrint 11 & 11            &

14、#160; DPrint 32700 + 10018設(shè)x=12，y=10，z=8，執(zhí)行語句Print x < y < z后，窗體上顯示的是_。A. True      B. False       C. -1        D. 出錯(cuò)信息19執(zhí)行下面語句的正確顯示結(jié)果是_。     Print Format(+2004.601, "+#,#.00

15、00")A. +2,004.601    B. +#2,004.601    C. #2,004.6010    D. +2,004.601020在某過程中已說明變量a為整型、變量s為字符型，過程中的以下四組語句不能正常執(zhí)行的是        。A. s = 2 * a + 1            

16、0;              B. s = "237" & ".11" :  a = sC. s = " True "                      

17、0;     D. a = 2  :  s = 16400 * a21在某事件過程中，以下聲明語句正確的是_。A. Const eps As SingleB. Dim ivar = "ABC"C. Dim n As Integer, a(1 to n) As IntegerD. Static m As Integer22關(guān)于窗體Name屬性的敘述，正確的是            。A窗體Name屬性的屬性值必須通過屬

18、性窗口進(jìn)行設(shè)置B窗體Name屬性的屬性值最長可達(dá)255個(gè)字符C窗體Name屬性的屬性值不能與其它的控件對象的Name屬性的屬性值相同D窗體Name屬性的屬性值可以通過賦值語句來給它賦值23確定一個(gè)控件在窗體上的位置的屬性是           。AWidth 和Height             BWidth 或HeightCTop和Left   

19、;            DTop或Left24關(guān)于窗體的Load語句和Show方法，下列說法正確的是            。ALoad和Show的功能一樣，都是將指定的窗體裝入內(nèi)容，同時(shí)顯示出來BLoad和Show的功能一樣，都是將指定的窗體裝入內(nèi)容，但都不顯示出來CLoad和Show都能將窗體裝入內(nèi)存，但前者不顯示出來，而后者顯示出來DLoad和Show都能將窗

20、體裝入內(nèi)存，但前者顯示出來，而后者不顯示出來25以下能夠觸發(fā)文本框Change事件的是_。A. 文本框失去焦點(diǎn)               B. 文本框獲得焦點(diǎn)C. 清空文本框原有的內(nèi)容       D. 文本框設(shè)置焦點(diǎn)26在窗體上有一文本框（名稱為Text1），有如下代碼:Private Sub Form_Click()Text1.SelStart = 5: Text1.SelLength = 3: Text1.S

21、elText = "hello"End Sub 運(yùn)行該程序在文本框中輸入：this is a book。然后單擊窗體，在文本框中將顯示_  _。A. this is a book           B. thishello a bookC. this hello a book             D. this helloa book27設(shè)窗體上有一個(gè)

22、文本框Text1，程序運(yùn)行后，要求該文本框只能顯示信息不能接收輸入的信息，以下能實(shí)現(xiàn)該功能的語句是           。AText1.Locked = True           BText1.Enabled = True    CText1.Visible = True        

23、;  DText1.TabStop = True28在窗體上有兩個(gè)文本框Text1和Text2，若希望在Text1中輸入字符時(shí)，該字符也將出現(xiàn)在Text2中，要實(shí)現(xiàn)該功能，則必須在文本框Text1的          事件中書寫代碼。AClick    BGotFocus    CLostFocus    DChange29在窗體上畫一個(gè)文本框，然后編寫如下事件過程：   &#

24、160;  Private Sub Form_Click()        x = InputBox$("請輸入一個(gè)整數(shù)")        Print  x + Text1.Text      End Sub程序運(yùn)行時(shí)，在文本框中輸入456，然后單擊窗體，在輸入對話框中輸入123，單擊“確定”按鈕后，則在窗體上顯示的內(nèi)容是：   

25、0;        。A. 123       B. 456       C. 579        D. 12345630窗體上有一個(gè)標(biāo)簽Label1，假設(shè)已存在三個(gè)整型變量a、b和c，且變量a 、b和c的值分別為1、2和3。以下的_語句可以使標(biāo)簽內(nèi)顯示的內(nèi)容為：3=1+2    A. Label1.Cap

26、tion = c = a + b               B. Label1.Caption = "c=a+b"C. Label1 = c & "=" & a & "+" & b          D. Label1.Print c & "="

27、& a & "+" & b31下列語句中，結(jié)果與Print  "M"Tab(15); "ABC" 輸出相同的是           。APrint "M"spc(14); "ABC"        BPrint "M","ABC"CPrint "

28、M"spc(12); "ABC"        DPrint "M"Tab(14); "ABC"32下列語句不能正確執(zhí)行的是           。APrint "a"+"b"  BPrint 123+"42b" CPrint 12<45  DPrint 12 &

29、4533執(zhí)行如下兩條語句后，窗體上顯示的是           。   A=9.8596   Print Format(A, "$0,000.00")A 0,009.86        B$9.86         C9.86     &#

30、160;    D$0,009.8634下列控件中，具有Caption屬性的是            。A文本框        B復(fù)選框       C滾動(dòng)條       D列表框35下列選項(xiàng)中（其中對象的Name屬性值均為默認(rèn)值），控件的屬性值既能在設(shè)計(jì)時(shí)設(shè)置，又能在

31、運(yùn)行時(shí)通過賦值語句改變的是            。AList1.Name                   BText1.MultiLineCCommand1.Style            &

32、#160;  DLabel1.Visible36為了在按下ESC鍵時(shí)執(zhí)行某個(gè)命令按鈕的Click事件過程，需要把該命令按鈕的           屬性的值設(shè)置為True。AValue    BDefault      CCancel       DEnabled37下列有關(guān)單選鈕、復(fù)選框和框架的說法中，錯(cuò)誤的是  &#

33、160;        。A框架中的單選鈕和復(fù)選框?qū)㈦S框架一起移動(dòng)、顯示和消失；B若要在框架中創(chuàng)建單選鈕，只需將窗體上的單選鈕拖到框架中即可；C框架的主要功能是用于對窗體上一些對象的分組，以便提供視覺上的區(qū)分；D對于框架中的單選鈕來說，它的操作不會(huì)影響框架外單選鈕的操作。38以下關(guān)于復(fù)選框的說法，正確的是_。A. 一個(gè)窗體上的所有復(fù)選框一次只能有一個(gè)被選中B. 一個(gè)框架中的所有復(fù)選框一次只能有一個(gè)被選中C.  若選中一個(gè)復(fù)選框，則另一個(gè)已被選中的復(fù)選框自動(dòng)變?yōu)椴槐贿x中D. 無論是在框架中還是在窗體中，都可

34、以同時(shí)選中多個(gè)復(fù)選框39若需要在同一窗體內(nèi)安排兩組相互獨(dú)立的單選鈕（ OptionButton ），可使用 _ 控件將它們分隔開。 TextBox PictureBox Image Frame 40對時(shí)鐘控件來說，它不具有的屬性是          。AInterval          BVisibleCEnabled        D

35、Name41為使計(jì)時(shí)器控件每隔3秒鐘產(chǎn)生一個(gè)計(jì)時(shí)器事件（Timer事件），則應(yīng)將其Interval屬性的值設(shè)置為_。A3          B300           C 3000           D180 42如圖1所示，在窗體中創(chuàng)建了框架、單選鈕和命令按鈕（其中對象的N

36、ame屬性值均為默認(rèn)值），圖中“公共基礎(chǔ)課”字樣的內(nèi)容，是通過            語句來實(shí)現(xiàn)的。AFrame1.Caption="公共基礎(chǔ)課"BForm1.Caption="公共基礎(chǔ)課"COption1.Caption="公共基礎(chǔ)課"DCommand1.Caption="公共基礎(chǔ)課"43在使用菜單編輯器設(shè)計(jì)菜單時(shí)，必須設(shè)置的菜單項(xiàng)屬性是     

37、0;    。   A. Index  B. Name  C. Checked   DVisible44在用菜單編輯器設(shè)計(jì)菜單時(shí)，必須輸入的是_。A. 標(biāo)題          B.  名稱           C.  快捷鍵      &#

38、160;   D.  熱鍵45下列選項(xiàng)中不屬于結(jié)構(gòu)化程序設(shè)計(jì)的基本結(jié)構(gòu)的是          。A順序結(jié)構(gòu)  B選擇結(jié)構(gòu)   C循環(huán)結(jié)構(gòu)   D遞歸結(jié)構(gòu)46下面關(guān)于賦值語句的說法中，錯(cuò)誤的是          。A一個(gè)賦值語句只能給一個(gè)變量(或?qū)ο蟮囊粋€(gè)屬性)賦值B賦值語句是一種順序語句C當(dāng)賦值語句中變量的數(shù)據(jù)類型與表達(dá)式的數(shù)據(jù)類型不一致

39、時(shí)，該語句一定會(huì)出錯(cuò)D賦值語句中出現(xiàn)兩個(gè)“=”號時(shí)，系統(tǒng)會(huì)根據(jù)“=”所處的位置自動(dòng)判斷符號的意義。47如圖2所示，Inputbox函數(shù)的參數(shù)中“提示信息”的值是          。A輸入你的學(xué)號B信息輸入框C0101001D確定 48若要在窗體上彈出一個(gè)輸入信息對話框，其標(biāo)題為"輸入對話框"，提示信息為"請輸入您的姓名"，缺省信息為空，對話框在屏幕上顯示位置的x坐標(biāo)和y坐標(biāo)均為100，則使用正確的InputBox函數(shù)是_。A.  InputBo

40、x("請輸入您的姓名","輸入對話框",100,100)B.  InputBox("請輸入您的姓名","輸入對話框",100,100)C.  InputBox("輸入對話框","請輸入您的姓名",100,100,)D.  InputBox("輸入對話框","請輸入您的姓名",100,100)49通用對話框的Action屬性決定了通用對話框在運(yùn)行階段打開何種類型的對話框，當(dāng)Action屬性

41、值為1時(shí)，其與之對應(yīng)的方法是            。AShowSave    BShowOpen    CShowColor    DShowFont50在Select Case X結(jié)構(gòu)中，如果60X69是其中的一個(gè)判斷條件，則正確描述的測試項(xiàng)應(yīng)該寫成            。A. Ca

42、se 60 <= X <= 69            B. Case X>=60 And X <= 69 C. Case 60 To 69                 D. Case Is <= 69, Is >=60 51若選中單選鈕Opt1時(shí)執(zhí)行某個(gè)操作，則下列IF語句中條件表達(dá)式表

43、述不正確的是          。AIf Opt1 = True Then           BIf Opt1.Value = 1 ThenCIf Opt1 Then                  DIf Opt1.Value = -

44、1 Then52在Select Case X結(jié)構(gòu)中，如果5X10是其中的一個(gè)判斷條件，則正確描述5X10的測試項(xiàng)應(yīng)該寫成            。A. Case 5 <= X <= 10                        B. Case

45、 5 <= X, X <= 10 C. Case 5 To 10                            D. Case Is <= 10, Is >= 5 53現(xiàn)有語句： y = IIf(x > 0 , x 5, 0)      設(shè)x = 10，則y的值是

46、0;         。A10     B2      C0       D語句有錯(cuò)   54閱讀以下程序，運(yùn)行該程序，單擊窗體，則在窗體上顯示            。Private Sub Form_Click()Dim i As In

47、tegerFor i = 1 To 5    i = i + 1Next iPrint iEnd SubA.5      B.6      C.7      D.855執(zhí)行下面的程序，當(dāng)單擊窗體時(shí)，窗體上顯示的是_。Private Sub Form_Click()    Dim I As Integer, s As Integer    For I = 5

48、To 32 Step 9        s = s + I    Next I    s = s + I    Print s, IEnd SubA.  74    32    B.  74    41     C. 115   41   

49、 D. 115   3256下面的循環(huán)語句中，不可以采用          來求1到100的和。ASum = 0                BSum = 0For I = 1 To 100            For I = 100

50、To 1 Step -1      Sum = Sum + I                Sum = Sum + I Next I                     Next ICI = 1 

51、0;                 DI = 1Do                          Do Until I > 100   Sum = Sum + I&#

52、160;                I = I + 1I = I + 1                     Sum = Sum + I Loop While I <= 100      

53、0; Loop57以下關(guān)于數(shù)組的說法中，錯(cuò)誤的是_。A.  可用Public語句在窗體模塊的通用說明處定義一個(gè)全局?jǐn)?shù)組。B.  對數(shù)組的輸入輸出處理常常和循環(huán)結(jié)合在一起使用。C. 控件數(shù)組可以在設(shè)計(jì)時(shí)創(chuàng)建,也可以在運(yùn)行時(shí)創(chuàng)建。D在過程中用ReDim語句定義的動(dòng)態(tài)數(shù)組，其下標(biāo)的上下界可為賦了值的變量。58對動(dòng)態(tài)數(shù)組A()，若原數(shù)組為A(5)，要改變其維界為A(10)，同時(shí)還要保留原數(shù)組的數(shù)據(jù)不丟失，應(yīng)使用         語句進(jìn)行重新定義。A. Dim A(10) &

54、#160;                B. ReDim Preserve A(5 To 10)   C. ReDim Preserve A(10)       D. ReDim A(10)59下面關(guān)于Array函數(shù)的說法錯(cuò)誤的是          。AArray函數(shù)可以給定義

55、為變體類型的動(dòng)態(tài)數(shù)組賦值BArray函數(shù)可以給任意維的數(shù)組賦值CArray函數(shù)可以給定義為變體類型的變量賦值DArray函數(shù)只能給一維數(shù)組賦值60下面定義數(shù)組的語句中錯(cuò)誤的是          。ADim a(x-10)                BDim f(3,1 To 4)      CDim m( ) As

56、 Single        DStatic b(0 To 5) As Long    61下列有關(guān)控件數(shù)組的說法中，錯(cuò)誤的是            。A. 控件數(shù)組可以在設(shè)計(jì)時(shí)創(chuàng)建，也可以在運(yùn)行時(shí)創(chuàng)建B. 命令按鈕可以和標(biāo)簽組成控件數(shù)組C. 控件數(shù)組通過索引號來指定某個(gè)控件元素D. 控件數(shù)組具有相同的名稱，共享同樣的事件過程62假定一個(gè)VB應(yīng)用程序由一個(gè)窗體模塊和一個(gè)標(biāo)準(zhǔn)模塊構(gòu)成。為了

57、保存該應(yīng)用程序，以下正確的操作是           。A只保存窗體模塊文件B分別保存窗體模塊、標(biāo)準(zhǔn)模塊和工程文件C只保存窗體模塊和標(biāo)準(zhǔn)模塊文件D只保存工程文件63以下敘述中錯(cuò)誤的是           。A打開一個(gè)工程文件時(shí)，系統(tǒng)自動(dòng)裝入與該工程有關(guān)的窗體、標(biāo)準(zhǔn)模塊等文件B當(dāng)程序運(yùn)行時(shí)，雙擊一個(gè)窗體，則觸發(fā)該窗體的DblClick事件CVB應(yīng)用程序只能以解釋方式執(zhí)行DVB中有的事件可以由用戶引發(fā)

58、，有的事件也可以由系統(tǒng)引發(fā)64如果一個(gè)工程含有多個(gè)窗體及標(biāo)準(zhǔn)模塊，則以下敘述中正確的是_ 。A如果工程中含有Sub Main過程，則程序一定首先執(zhí)行該過程B可以把標(biāo)準(zhǔn)模塊設(shè)置為啟動(dòng)模塊 C用Hide方法只是隱藏一個(gè)窗體，并沒有從內(nèi)存中卸載該窗體D要用Show方法來顯示一個(gè)窗體時(shí)，該窗體必須已在內(nèi)存中65編寫一個(gè)對Single類型一維數(shù)組a排序的Sub過程，該過程只能被本模塊中其他過程所調(diào)用，其首句為            。A. Sub f(a() As Single, n As In

59、teger)      B. Private Sub f(a() As Single)C. Private Sub f(a As Single, n As Integer)D. Public Sub f(a() As Single)66若某過程聲明為Sub  g(n as Integer)，調(diào)用程序中的變量m為Integer型，則調(diào)用時(shí)實(shí)參與形參是按地址傳遞的為            。A. Call  g(5)&#

60、160;   B. Call  g(m+1)    C. Call  g(m)   D. Call  g( m )67有如下事件過程：Private Sub Command1_Click()        Static n As IntegerDim m As Integer       Cls       For m = 1 to 3&

61、#160;           n = m + n        Next m        Print m, nEnd Sub程序運(yùn)行時(shí)，兩次單擊Command1命令按鈕后，窗體上的顯示結(jié)果為_    _。A.  3   6     B. 3  12 

62、60;      C. 4   6         D. 4  1268在窗體Form1中用"Public Sub F(x As Single)"定義過程F，在窗體Form2中定義了變量i為Integer型，則若要在窗體Form2的某事件過程中調(diào)用窗體Form1中的過程F，下列語句中錯(cuò)誤的是_。A.  Call Form1.F(i)      &#

63、160;  B.  Call Form1.F(i) C.  Form1.F  (i)           D.  Form1.F  i+169若要定義一個(gè)變量，希望能夠在該窗體的所有事件過程中都能夠訪問，可以將其定義為_。靜態(tài)變量  局部變量   窗體/模塊級變量   全局變量A.        B.  &#

64、160;    C.      D. 70在窗體上有一個(gè)名稱為Commandl的命令按鈕，然后編寫如下程序：Private Sub Commandl_Click()Static n As IntegerDim m As IntegerClsm = 2m = m + 5n = m + nPrint m, nEnd Sub程序運(yùn)行時(shí)，三次單擊Commandl命令按鈕后，窗體上的顯示結(jié)果為_。A.  7  21       B.  21

65、60; 7        C.  7  14         D.  7  771在窗體（Name屬性為Form1）上畫兩個(gè)文本框（Name屬性分別為T1和T2）和一個(gè)命令按鈕（Name屬性為C1）。單擊命令按鈕C1后在窗體上輸出的結(jié)果為           。Private Sub C1_Click()&#

66、160;   s = T1.Text + T2.Text    Print sEnd SubPrivate Sub Form_Load()    T1.Text = 234    T2.Text = 432End SubA666          B234432        C432234   &

67、#160;  D出錯(cuò)72現(xiàn)有一自定義的Sub子過程Private Sub Sort(A() As Integer)，主調(diào)過程中對數(shù)組的定義語句為Dim m(10) As Integer，下列選項(xiàng)中不能正確調(diào)用該子過程的語句是          。ASort  m                  BCall 

68、 Sort(m)    CCall  Sort(m(10)        DSort  m()73以下關(guān)于變量的作用域的說法中正確的是          。Private X As IntegerPrivate Sub Form_Load()   Dim X As Integer     Show   X=2 

69、0;  Print X   End Sub A窗體的“通用聲明”處聲明的X的值2     B兩個(gè)變量的值都是2CLoad事件過程中聲明的X的值2           D兩個(gè)變量的值都不是2  74下列控件中，具有Caption屬性的控件是          。A滾動(dòng)條     &

70、#160;      B列表框C計(jì)時(shí)器            D框架75將字符串"I like VB"添加到列表框的最后，可使用_語句。A. List1.AddItem "I like VB",List1.ListCount-1 B. List1.AddItem "I like VB",List1.ListCount+1C. List1.AddIt

71、em "I like VB",List1.ListIndexD. List1.AddItem "I like VB" 76關(guān)于列表框的Text屬性，下列             所描述的含義與List1.Text等價(jià)。AList1.List                

72、;     BList1.ListIndexCList1.List(List1.ListIndex)    DList1.List(ListIndex)77輸出列表框（List1）最后一個(gè)數(shù)據(jù)項(xiàng)可以使用            。APrint List1.List(List1.ListCount)   BPrint List1.List(List1.ListCount - 1)CPrint List

73、1.List(ListCount)         DPrint List1.List(ListCount - 1)78要將一個(gè)組合框設(shè)置為簡單組合框，則應(yīng)將其Style屬性設(shè)置為_。A0           B1            C2     

74、;         D379下列關(guān)于改變滾動(dòng)條Value屬性值的方法，錯(cuò)誤的是          。A單擊滾動(dòng)條兩端的三角鈕可以改變其Value屬性值；B可以通過賦值語句來改變滾動(dòng)條的Value屬性值；C單擊滾動(dòng)條滑塊兩端的空白處可以改變其Value屬性值；D單擊滾動(dòng)條上的滑塊可以改變其Value屬性值。80滾動(dòng)條控件的LargeChange屬性所設(shè)置的是_。A. 單擊滾動(dòng)條上空白區(qū)域時(shí)，滾動(dòng)條控件Valu

75、e屬性值的改變量B. 單擊滾動(dòng)條兩端的箭頭時(shí)，滾動(dòng)條控件Value屬性值的改變量C. 單擊滾動(dòng)條上空白區(qū)域時(shí)，滾動(dòng)條上滑塊將移動(dòng)到Value屬性的最大值位置D. 單擊滾動(dòng)條兩端的箭頭時(shí)，滾動(dòng)條上滑塊的最大移動(dòng)范圍81下列操作中，不能觸發(fā)滾動(dòng)條的Change事件的操作是            。A單擊滾動(dòng)條兩端的箭頭            

76、     B單擊滾動(dòng)條空白區(qū)域C通過程序?qū)L動(dòng)條的value屬性賦值      D單擊滾動(dòng)條上的滑塊82在VB中，下列關(guān)于控件的屬性或方法中，搭配錯(cuò)誤的有            個(gè)。(1)Command1.Value    (2)List1.Cls         (3)Label1.Pr

77、int (4)Timer1.Visible    (5)VScroll1.Value    (6)Picture1.Print(7)Option1.Value     (8)Text1.ValueA3           B4          C5     

78、     D683在VB中，下列關(guān)于控件的屬性或方法中，搭配錯(cuò)誤的有        個(gè)。(1) Picture1.Print         (2)Timer1.Height      (3)Text1.Print(4)List1.RemoveItem      (5)Vscroll1.Value 

79、    (6) Command1.ValueA1         B2        C3        D484下列選項(xiàng)中，可以列出計(jì)算機(jī)中的所有驅(qū)動(dòng)器的控件是            。A驅(qū)動(dòng)器列表框   

80、B目錄列表框    C文件列表框    D列表框85在窗體上創(chuàng)建驅(qū)動(dòng)器列表框Drive1和目錄列表框Dir1，如果希望改變Drive1中的驅(qū)動(dòng)器時(shí)，Dir1中顯示的目錄也隨之變化，則在Drive1的Change事件中的代碼正確的是          。ADir1.Path = Drive1.Path           BDrive1.Drive

81、= Dir1.PathCDir1.Path = Drive1.Drive           DDrive1.Path = Dir1.Path86下列有關(guān)打開順序文件的說法錯(cuò)誤的是            。AFor模式中的Output選項(xiàng)可用來在磁盤上創(chuàng)建一個(gè)新的順序文件。BInput選項(xiàng)用來從文件中讀取。若該文件不存在，則創(chuàng)建一個(gè)文件。CAppend選項(xiàng)可用來打開一個(gè)新的順序文件，文件打開后文件

82、指針位于文件的末尾。D可以使用不同的文件號以Input方式打開同一順序文件。87. 以下有關(guān)文件的說法中正確的是           。A打開文件命令中，所指定的文件號最大可取512 B在Input方式下，不能使用不同文件號同時(shí)打開同一個(gè)文件C若以O(shè)utput或Append方式打開一個(gè)不存在的順序文件，系統(tǒng)會(huì)出錯(cuò)D若以Input方式打開一個(gè)不存在的順序文件，系統(tǒng)會(huì)出錯(cuò)88關(guān)于順序文件的描述，下列說法中正確的是       &#

83、160;  。A可以用兩個(gè)不同的文件號同時(shí)打開一個(gè)順序文件來進(jìn)行讀操作或?qū)懖僮?；B使用Output模式打開一個(gè)順序文件進(jìn)行寫操作時(shí)，如果文件已經(jīng)存在，則用新的數(shù)據(jù)來取代原文件中的數(shù)據(jù)；C如果打開了一個(gè)順序文件進(jìn)行讀操作，那么讀操作結(jié)束后必須要用Close語句來關(guān)閉已打開的文件；D用Append模式打開一個(gè)文件進(jìn)行寫操作，如果文件不存在，則無法對該文件進(jìn)行寫數(shù)據(jù)，如果文件已經(jīng)存在，則從末尾開始寫數(shù)據(jù)。二、分析程序，寫結(jié)果1. 運(yùn)行下面的程序，當(dāng)單擊窗體時(shí)，窗體上顯示的內(nèi)容第一行是_(1)_，第二行是_(2)_。Private Sub Form_Click()   &

84、#160;Dim x As Integer, y As Integer    Do       x = x + 2       y = y + x * x       If x > 4 Then Exit Do       End If    Loop    Pr

85、int x    Print yEnd Sub2. 運(yùn)行下面的程序，當(dāng)單擊窗體時(shí)，窗體上顯示的內(nèi)容第一行是_(3)_，第二行是_(4)_。Private Sub Form_Click()Dim a(3, 3) As Integer, i As Integer, j As Integer    For i = 1 To 3       For j = 1 To 3          

86、60;a(i, j) = (i - 1) * 3 + j * 2       Next jNext i    For i = 1 To 3       For j = i + 1 To 3           Print a(j, i);       Next j  &

87、#160;    Print    Next iEnd Sub3. 運(yùn)行下面的程序，當(dāng)單擊窗體時(shí)，窗體上顯示的內(nèi)容第一行是   (5）   ，第三行是   (6)   ，F(xiàn)orm_Click()事件過程中的第二個(gè)For-Next循環(huán)共執(zhí)行了  (7)  次。Private Sub Form_Click()Dim x(1 To 4) As IntegerDim i As Integer, j As Integer  &

88、#160; For i = 1 To 4        x(i) = i * i        Print x(i);    Next i    Print    For j = 1 To 4        Call sub1(x(j), j)    

89、0;   Print j    Next jEnd SubPrivate Sub sub1(x As Integer, m As Integer)    If x - m <= 2 Then        m = m + 2    Else        m = m + 3    End IfEnd Sub4.

90、運(yùn)行下面的程序，當(dāng)單擊窗體時(shí)，窗體上顯示的內(nèi)容第一行是_(8)_，第二行是_(9)  _，第三行是_(10)_。Private Sub Form_Click()   Print cal(2)End SubPrivate Function cal(a As Integer) As Integer   Dim temp As Integer   If a = 1 Then      temp = 2   Else    

91、  temp = cal(a - 1) * 2   End If   cal = temp   Print a, tempEnd Function5. 運(yùn)行下列程序，單擊窗體，當(dāng)在Inputbox輸入框中輸入值為7時(shí)，窗體上顯示的內(nèi)容是     （1）       ，本程序的功能是   （2）         。Private

92、Sub Form_Click()Dim S$, n%, a%n = Val(InputBox("請輸入一個(gè)十進(jìn)制整數(shù)：")S = ""Do While n <> 0a = n Mod 2n = n 2S = Chr(Asc("0") + a) & SLoopPrint SEnd Sub 6. 運(yùn)行下列程序，單擊窗體，則在窗體上顯示的第一行內(nèi)容是_ （3）   _，第二行內(nèi)容是_  （4） _，第四行內(nèi)容是    （5）   &

93、#160; 。Private Sub Form_Click()    Dim a(2, 3) As Integer, b(1 To 6) As Integer    Dim i As Integer, j As Integer    For i = 1 To 2        For j = 1 To 3          &#

94、160; a(i, j) = i * 3 + j * 2 + 3            Print a(i, j);            b(i - 1) * 3 + j) = 2 * a(i, j)        Next j       

95、60;Print    Next i    For i = 1 To UBound(b)        Print Right("0" & CStr(b(i) & "b", 3),        If i Mod 3 = 0 Then Print    Next iEnd Sub 7. 運(yùn)行下列程序，當(dāng)

96、單擊Command1時(shí)，窗體上顯示的第二行內(nèi)容是   （6）     ，第四行內(nèi)容是    （7）   。Private Sub Command1_Click()    Print Test(5)End SubPrivate Function Test(t As Integer) As Integer    If t >= 1 Then       Test =

97、 2 * Test(t - 2) + 1       Print Chr(Asc("A") + t)    End IfEnd Function 8. 運(yùn)行下列程序，單擊窗體后，則在窗體上顯示的第一行內(nèi)容是_（_8_）_，第二行內(nèi)容是  _（9）_   ，第四行內(nèi)容是    （10）   。Dim m As IntegerPrivate Sub Form_Click()Dim x As Integ

98、er, y As Integerx = 3: y = 2: m = 2   sub1 y, x   Print x, y, m   Call sub1(x, y)   Print x, y, mEnd SubPrivate Sub sub1(x As Integer, ByVal y As Integer) Dim m As Integer   x = m * 2 + y   y = x + 1   m = m + y   Print

99、x, y, mEnd Sub9. 執(zhí)行下面的程序，當(dāng)單擊窗體時(shí)，第一行顯示的是     （1）     ，第二行顯示的是  （2）     ，第三行顯示的是  （3）    。Private Sub Form_Click()    Dim A(5, 5) As Integer    Dim I As Integer, J As Integer  &

100、#160; For I = 2 To 3        For J = 2 To 3            A(I, J) = (I - 1) * 2 + J            If I = 3 Then Print A(I, J)      &

101、#160; Next J    Next I    Print A(I, J)End Sub10. 執(zhí)行下面的程序，當(dāng)單擊命令按鈕Command1時(shí)，窗體的第二行顯示的是   （4）   ，第四行顯示的是  （5）     。（注：小寫字母a的ASCII值為97）Private Sub Command1_Click()    Dim s As String, i As Integer, s1 As String    i = Asc("a")