2017年9月計算機二級考試VB復習題

　　2017年計算機二級考試馬上就要開始了，你報考了VB科目嗎?為了方便考生備考計算機二級考試VB 科目。下面是小編為大家帶來的計算機二級考試VB復習題，歡迎閱讀。

　　復習題一：

　　1.在窗體上畫一個名稱為Text1的文本框，一個名稱為Command1的命令按鈕，然后編寫如下事件過程和通用過程：

　　Private Sub Command1_Click( )

　　n = Val(Text1.Text)

　　If n2 = n/2 Then

　　f = f1(n)

　　Else

　　f = f2(n)

　　End If

　　Print f; n

　　End Sub

　　Public Function f1(ByRef x)

　　x=x*x

　　f1=x+x

　　End Function

　　Public Function f2(ByVal x)

　　x=x*x

　　f2=x+x+x

　　End Function

　　程序運行后，在文本框中輸入3，然后單擊命令按鈕，窗體上顯示的是(D)(單)

　　A.72 36

　　B.108 36

　　C.72 6

　　D.27 3

　　2.在窗體上畫一個名稱為Command1的命令按鈕，然后編寫如下事件過程：

　　Private Sub Command1_Click( )

　　c = "1234"

　　For i = 1 To 4

　　c1 = Trim(Str( ))

　　Print　c1

　　Next i

　　End Sub

　　程序運行后，單擊命令按鈕，要求在窗體上顯示如下內容

　　1

　　12

　　123

　　1234

　　則在下劃線處應填入的內容為(B)(單)

　　A.Right(c1,i)

　　B.Left(c1,i)

　　C.Mid(c1,i,1)

　　D.Mid(c1,i,i)

　　3.在窗體上畫一個名稱為Command1的命令按鈕和一個名稱為Text1的文本框，然后編寫如下事件過程：

　　Private Sub Command1_Click( )

　　n = Val(Text1.Text)

　　For i = 2 To n

　　For j = 2 To sqr(i)

　　If i Mod j = 0 Then Exit For

　　Next j

　　If j >Sqr(i) Then Print i

　　Next i

　　End Sub

　　該事件過程的功能是(C)(單)

　　A.輸出n以內的奇數

　　B.輸出n以內的偶數

　　C.輸出n以內的素數

　　D.輸出n以內能被j整除的數

　　4.在窗體上畫一個名稱為Command1的命令按鈕，然后編寫如下通用過程和命令按鈕的事件過程：

　　Private Function f(m As Integer)

　　If m Mod 2 = 0 Then

　　f = m

　　Else

　　f = 1

　　End If

　　End Function

　　Private Sub Command1_Click( )

　　Dim i As Integer

　　s = 0

　　For i = 1 To 5

　　s = s + f(i)

　　Next

　　Print s

　　End Sub

　　程序運行后，單擊命令按鈕，在窗體上顯示的是(C)(單)

　　A.11

　　B.10

　　C.9

　　D.8

　　5.在窗體上畫一個名稱為Text1的文本框和一個名稱為Command1的命令按鈕，然后編寫如下事件過程：

　　Private Sub Command1_Click( )

　　Dim array1(10, 10) As Integer

　　Dim i As Integer, j As Integer

　　For i = 1 To 3

　　For j = 2 To 4

　　array1(i, j) = i + j

　　Next j

　　Next i

　　Text1.Text = array1(2, 3) + array1(3, 4)

　　End Sub

　　程序運行后，單擊命令按鈕，在文本框中顯示的值是(D)(單)

　　A.15

　　B.14

　　C.13

　　D.12

　　6.Visual Basic應用程序中標準模塊文件的擴展名是【BAS或.BAS】(注意不要寫點)。

　　7.在菜單編輯器中建立一個菜單，其主菜單項的名稱為mnuEdit，Visible屬性為False，程序運行后，如果用鼠標右鍵單擊窗體，則彈出與mnuEdit相應的菜單。

　　Private Sub Form_ 【mousedown】 (Button As Integer, Shift As Integer, X As Single, Y As Single)

　　If Button=2 Then

　　popupmenu mnuEdit

　　End If

　　End Sub

　　8.在菜單編輯器中建立一個菜單，其主菜單項的名稱為mnuEdit，Visible屬性為False，程序運行后，如果用鼠標右鍵單擊窗體，則彈出與mnuEdit相應的菜單。以下是實現上述功能的程序，請填空。

　　Private Sub Form mousedown (Button As Integer, Shift As Integer, X As Single, Y As Single)

　　If Button=2 Then

　　【popupmenu】 mnuEdit

　　End If

　　9.為了使計時器控件Timer1每隔0.5秒觸發一次Timer事件，應將Timer1控件的【Interval】屬性設置為500。

　　10.為了使計時器控件Timer1每隔0.5秒觸發一次Timer事件，應將Timer1控件的Interval屬性設置為【500】。

　　復習題二：

　　1.雙擊窗體中的對象后，VB將顯示的窗口是(C)(單)

　　A.工具箱

　　B.項目(工程)窗口

　　C.代碼窗口

　　D.屬性窗口

　　2.下述選項中，VB的程序設計方法是(B)(單)

　　A.面向對象、順序驅動

　　B.面向對象、事件驅動

　　C.面向過程、事件驅動

　　D.面向過程、順序驅動

　　3.在VB中，要將一個窗體裝載到內存進行變量初始化等預處理，但沒有顯示該窗體，應使用的方法或語句是(C)(單)

　　A.Show

　　B.Unload

　　C.Load

　　D.Hide

　　4.文本框的默認屬性是(B)(單)

　　A.Caption

　　B.Text

　　C.Name

　　D.Top

　　5.標簽默認屬性是(A)(單)

　　A.Caption

　　B.Text

　　C.Name

　　D.Top

　　6.執行以下程序段：

　　a$="abbacddcba"

　　For I=6 To 2 Step -2

　　X=Mid(a,I,I)

　　Y=Left(a,I)

　　z=Right(a,I)

　　z=Ucase(X&Y&z)

　　Next I

　　Print z

　　輸出結果為(B)(單)

　　A.ABA

　　B.BBABBA

　　C.ABBABA

　　D.AABAAB

　　7.在窗體上畫一個名稱為Command1的命令按鈕，然后編寫如下程序：

　　Option Base 1

　　Private Sub Command1_Click( )

　　Dim a As Variant

　　a=Array(1,2,3,4,5)

　　Sum=0

　　For I=1 To 5

　　Sum = sum+a(I)

　　Next I

　　x=Sum/5

　　For I =1 To 5

　　If a(I)>x Then Print a(I);

　　Next I

　　End Sub

　　程序運行后，單擊命令按鈕，在窗體上顯示的內容是(D)(單)

　　A.1 2

　　B.1 2 3

　　C.3 4 5

　　D.4 5

　　8.假定一個工程由一個窗體文件Form1和兩個標準模塊文件Model1及Model2組成。Model1代碼如下：

　　Public x As Integer

　　Public y As Integer

　　Sub S1( )

　　x =1

　　S2

　　End Sub

　　Sub S2( )

　　y=10

　　Form1.Show

　　End Sub

　　Model2的代碼如下：

　　Sub Main( )

　　S1

　　End Sub

　　其中Sub Main被設置為啟動過程。程序運行后，各模塊的執行順序是(C)(單)

　　A.Form1->Model1->Model2

　　B.Model1->Model2->Form1

　　C.Model2->Model1->Form1

　　D.Model2->Form1->Model1

　　9.設有如下程序段：

　　a$="beijingshanghai"

　　b$=Mid(a$,InStr(a$,"g")+1)

　　執行上面的程序段后，變量b$的值為【shanghai】

　　10.以下程序段的輸出結果是【3】

　　Num =0

　　Do While num<=2

　　num = num+1

　　Loop

　　Print num

　　11.在窗體上畫一個名稱為Command1的命令按鈕，然后編寫如下事件過程：

　　Private Sub Command1_Click( )

　　Move 500，500

　　End Sub

　　程序運行后，單擊命令按鈕，執行的操作為(A)(單)

　　A.命令按鈕移動到距窗體左邊界、上邊界各500的位置

　　B.窗體移動到距屏幕左邊界、上邊界各500的位置

　　C.命令按鈕向左、上方向各移動500

　　D.窗體向左、上方向各移動500

　　12.在窗體上有若干控件，其中有一個名稱為Text1的文本框。影響Text1的Tab順序的屬性是(D)(單)

　　A.TabStop

　　B.Enabled

　　C.Visible

　　D.TabIndex

　　13.在窗體上畫一個名稱為List1的列表框，為了對列表框中的每個項目都能進行處理，應使用的循環語句為(A)(單)

　　A.For i=0 To List1.ListCount-1 ......　 Next i

　　B.For i=0 To ListCount-1 ...... Next i

　　C.For i=1 To List1.listCount 　...... Next i

　　D.For i=1 To ListCount ...... Next i

　　14.以下Case語句中錯誤的是(C)(單)

　　A.Case 0 To 10

　　B.Case Is>10

　　C.Case Is>10 And Is<50

　　D.Case 3,5,Is>10

　　15.以下關于圖片框控件的說法中，錯誤的是(D)(單)

　　A.可以通過Print方法在圖片框中輸出文本

　　B.清空圖片框控件中圖形的方法之一是加載一個空圖形

　　C.圖片框控件可以作為容器使用

　　D.用圖片框控件的Stretch屬性可以自動調整圖片框中圖形的大小

　　16.執行語句s=Len(Mid("VisualBasic",1,6))后，s的值是(A)(單)

　　A.Visual

　　B.Basic

　　C.6

　　D.11

　　17.以下敘述中錯誤的是(D)(單)

　　A.下拉式菜單能用菜單編輯器建立

　　B.在多窗體程序中，每個窗體都可以建立自己的菜單系統

　　C.能夠對菜單項的Click事件編程

　　D.如果把一個菜單項的Enabled屬性設置為False，則該菜單項不可見

　　18.在窗體上畫一個命令按鈕，其名稱為Command1，然后編寫如下事件過程：

　　Private Sub Command1_Click( )

　　a = "12345"

　　Print Format$(a, "000.00")

　　End Sub

　　程序運行后，單擊命令按鈕，窗體上顯示的是(B)(單)

　　A.123.45

　　B.12345.00

　　C.12345

　　D.00123.45

　　19.以下關于函數過程的敘述中，正確的是(A)(單)

　　A.函數過程形參的類型與函數返回值的類型沒有關系

　　B.在函數過程中，過程的返回值可以有多個

　　C.當數組作為函數過程的參數時，既能以傳值方式傳遞，也能以傳址方式傳遞

　　D.如果不指明函數過程參數的類型，則該參數不能有數據類型的參數

　　20.以下關于變量作用域的敘述中，正確的是(C)(單)

　　A.用dim定義變量是靜態變量

　　B.靜態變量必須在標準模塊中聲明

　　C.用public定義變量是全局變量

　　D.Static類型變量的作用域范圍是它所在的窗體或模塊文件

　　21.確定一個控件在窗體上的位置的屬性是(C)(單)

　　A.Width和Height

　　B.Width或Height

　　C.Top和Left

　　D.Top或Left

　　22.在窗體上畫一個名稱為Text1的文本框和一個名稱為Command1的命令按鈕，然后編寫如下事件過程：

　　Private Sub Command1_Click( )

　　Text1.Text = "Visual"

　　Me.Text1 = "Basic"

　　Text1 = "Program"

　　End Sub

　　程序運行后，如果單擊命令按鈕，則在文本框中顯示的是(C)(單)

　　A.Visual

　　B.Basic

　　C.Program

　　D.出錯

　　23.以下關系表達式中，其值為False的是(A)(單)

　　A."ABC">"AbC"

　　B."the"<>"they"

　　C."VISUAL"=UCase("Visual")

　　D."Integer">"Int"

　　24.語句Print int(5/4*65) Mod 2的輸出結果是(B)(單)

　　A.0

　　B.1

　　C.2

　　D.3

　　25.在窗體上畫一個文本框、一個標簽和一個命令按鈕，其名稱分別為Text1、Label1和Command1，然后編寫如下兩個事件過程：

　　Private Sub Command1_Click( )

　　strText = InputBox("請輸入")

　　Text1.Text = strText

　　End Sub

　　Private Sub Text1_Change( )

　　Label1.Caption = Right(Trim(Text1.Text), 3)

　　End Sub

　　程序運行后，單擊命令按鈕，如果在輸入對話框中輸入abcdef，則在標簽中顯示的內容是(D)(單)

　　A.空

　　B.abcdef

　　C.abc

　　D.def

　　26.在窗體上畫一個名稱為Command1的命令按鈕，然后編寫如下事件過程：

　　Private Sub Command1_Click( )

　　x = -5

　　If x >0 Then

　　y = x ^ 2

　　Else

　　y = x

　　End If

　　Print y

　　End Sub

　　程序運行后，單擊命令按鈕，窗體上顯示的是(A)(單)

　　A.-5

　　B.25

　　C.1

　　D.-1

　　27.一個工程中含有窗體Form1、Form2和標準模塊Model1，如果在Form1中有語句Pubilc X As

　　Integer，在Model1中有語句Pubilc Y As Integer，則以下敘述中正確的是(A)(單)

　　A.變量X、Y的作用域相同

　　B.Y的作用域是Model1

　　C.在Form1的任何地方中可以直接使用Y

　　D.在Form2中可以直接使用X和Y

　　28.在窗體上畫一個名稱為Drive1的驅動器列表框，一個名稱為Dir1的目錄列表框。當改變當前驅動器時，目錄列表框應該與之同步改變。設置兩個控件同步的命令放在一個事件過程中，這個事件過程是(A)(單)

　　A.Drive1_Change

　　B.Drive1_Click

　　C.Dir1_Click

　　D.Dir1_KeyPress

　　29.在窗體上畫一個命令按鈕(其NAME屬性為Command1)，然后編寫如下代碼：

　　Option Base 1

　　Private Sub Command1_Click( )

　　Dim a

　　s = 0

　　a = Array(1, 2, 3, 4)

　　For I = 4 To 1 Step -1

　　s = s + a(I)

　　Next I

　　Print s

　　End Sub

　　運行上面的程序，單擊命令按鈕，其輸出結果是(D)(單)

　　A.4321

　　B.1234

　　C.34

　　D.10

　　30.在窗體上畫一個名稱為Text1的文本框，編寫以下代碼：

　　Private Sub Text1_KeyPress(KeyAscii As Integer)

　　If KeyAscii < 65 　Or　 KeyAscii> 90 Then

　　msgBox "請輸入大寫字母"

　　KeyAscii = 0

　　End If

　　End Sub

　　以下能說明該事件過程正確是(A)(單)

　　A.要求文本框只能接收大寫字母的輸入

　　B.要求文本框只能接收小寫字母的輸入

　　C.要求文本框只能接收數字的輸入

　　D.要求文本框只能接收65到90之間的數值的輸入

【9月計算機二級考試VB復習題】相關文章：

9月計算機二級考試VB真題10-11

2017年9月計算機二級考試VB基礎題05-22

2017年9月計算機二級考試VB測試題08-16

2017年9月計算機二級VB考試模擬測試練習05-22

2016年9月計算機二級《VB》上機試題07-07

2023年9月計算機二級《VB》考題與答案09-05

2017年3月計算機二級考試《VB》考試題及答案08-22

2017年9月計算機二級考試《VB》自測試題07-22

2017計算機二級VB復習題及答案08-30

2013年3月計算機二級考試VB筆試題及答案08-23