點擊查看：2018年12月計算機二級VB考試提分試題及答案匯總

　　1.設有如下程序段：

　　x=2

　　For c=1 To 4 Step 2

　　x=x+c

　　Next c

　　運行以上程序后，x的值是(A)

　　A.6

　　B.7

　　C.8

　　D.9

　　2.以下敘述中錯誤的是(A)

　　A.在KeyPress事件過程中不能識別鍵盤鍵的按下與釋放

　　B.在KeyPress事件過程中不能識別回車鍵

　　C.在KeyDown和KeyUp事件過程中，從鍵盤輸入的字母"A"和字母"a"對應的KeyCode視作相同的字母

　　D.在KeyDown和KeyUp事件過程中，從大鍵盤上輸入的"1"和從右側小鍵盤上輸入的"1"被視作不同的字符

　　3.執行如下兩條語句，窗體上顯示的是(C)

　　A=9.8596

　　Print Format(a,"000.00")

　　A.0,009.86

　　B.9.86

　　C.009.86

　　D.0,009.86

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

　　Private Sub Command1_Click( )

　　CommonDialog1.FileName =""

　　CommonDialog1.Filter="All file|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt"

　　CommonDialog1.FilterIndex=1

　　CommonDialog1.DialogTitle="VBTest"

　　CommonDialog1.Action=1

　　End Sub

　　對于這個程序，以下敘述中錯誤的是(D)

　　A.該對話框被設置為"打開"對話框

　　B.在該對話框中指定的文件名為空

　　C.該對話框的標題為VBTest

　　D.在該對話框中指定的默認文件類型為文本文件(*.Txt)

　　5.設一個工程由兩個窗體組成，其名稱分別為Form1和Form2，在Form1上有一個名稱為Command1的命令按鈕。窗體Form1的程序代碼如下：

　　Private Sub Command1_Click( )

　　Dim a As Integer

　　a=10

　　Call g(Form2,a)

　　End Sub

　　Private Sub g(f As Form,x As Integer)

　　y=Iif(x>10,100,-100)

　　f.Show

　　f.Caption=y

　　End Sub

　　運行以上程序，正確的結果是(B)

　　A.Form1的Caption屬性值為100

　　B.Form2的Caption屬性值為-100

　　C.Form1的Caption屬性值為-100

　　D.Form2的Caption屬性值為100

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

　　Private Sub Command1_Click( )

　　Dim x As Integer

　　Static y As Integer

　　x=10

　　y=5

　　Call f1(x,y)

　　Print x,y

　　End Sub

　　Private Sub f1(ByRef x1 As Integer, y1 As Integer)

　　x1=x1+2

　　y1=y1+2

　　End Sub

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

　　A.10 5

　　B.12 5

　　C.10 7

　　D.12 7

　　7.Option Base 1

　　Private Sub Command1_Click( )

　　Dim a(10) As Integer

　　Dim n As Integer

　　n=3

　　If n<10 Then

　　Call GetArray(a,n)

　　End If

　　End Sub

　　Private Sub GetArray(b( ) As Integer,n As Integer)

　　Dim c(10) As Integer

　　j=0

　　For t=1 To n

　　b(t)=Rnd*100

　　If b(t)/2=b(t)\2 Then

　　j=j+1

　　c(j)=b(t)

　　End If

　　Next t

　　Print j

　　End Sub

　　以下敘述中錯誤的是(C)

　　A.數組b中的數范圍為0-100

　　B.c數組下標的下界從1開始

　　C.GetArray過程的參數n是按值傳送的

　　D.語句If b(t)/2=b(t)\2 Then 是判斷數組b中元素的值是否為整數

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

　　Option Base 1

　　Private Sub Command1_Click( )

　　Dim a

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

　　For c=1 To Ubound(a)

　　a(c) = a(c)+c-1

　　Next c

　　Print a(3)

　　End Sub

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

　　A.4

　　B.5

　　C.6

　　D.7

　　9.閱讀程序：

　　Option Base 1

　　Private Sub Form_Click( )

　　Dim arr

　　Dim Sum%

　　Sum = 0

　　arr = Array(1, 3, 5, 7, 9)

　　For t = 1 To 5

　　Sum = Sum + arr(t)

　　Next t

　　Print Sum

　　End Sub

　　程序運行后，單擊窗體，輸入結果為(B)

　　A.5

　　B.9

　　C.25

　　D.15

　　10.在窗體上畫一個名稱為File1的文件列表框，并編寫如下程序：

　　Private Sub File1_DblClick( )

　　x=Shell(File1.FileName,1)

　　End Sub

　　以下關于該程序的敘述中，錯誤的是(A)

　　A.x沒有實際作用，因此可以將該語句寫為：Call Shell(File1,FileName,1)

　　B.雙擊文件列表框中的文件，將觸發該事件過程

　　C.要執行的文件的名字通過File1.FileName指定

　　D.File1中顯示的是當前驅動器、當前目錄下的文件

　　11.在窗體上畫一個名稱為Label1、標題為"VisualBasic考試"的標簽，兩個名稱分別為Command1和Command2、標題分別為"開始"和"停止"的命令按鈕，然后畫一個名稱為Timer1的計時器控件，并把其Interval屬性設置為500。編寫如下程序：

　　Private Sub Form_Load( )

　　Timer1.Enabled=False

　　End Sub

　　Private Sub Command1_Click( )

　　Timer1.Enabled=True

　　End Sub

　　Private Sub Timer1_Timer( )

　　If Label1.Left< Form1.Width Then

　　Label1.Left = Label1.Left + 20

　　Else

　　Label1.Left=0

　　End If

　　End Sub

　　程序運行后，單擊"開始"按鈕，標簽在窗體中移動。 對于這個程序，以下敘述中錯誤的是(A)

　　A.標簽的移動方向為自右向左

　　B.單擊"停止"按鈕后再單擊"開始"按鈕，標簽從停止的位置繼續移動

　　C.當標簽全部移出窗體后，將從窗體的另一端出現并重新移動

　　D.標簽按指定的時間時隔移動

　　12.規范地說，VB是一種(A)的開發工具

　　A.面向對象

　　B.面向用戶

　　C.面向屏幕

　　D.面向窗體

　　13.VB6設計界面包含多個視窗，控制這些視窗顯示或關閉的命令包含在(D)下拉菜單中

　　A.文件

　　B.工程

　　C.編輯

　　D.視圖

　　14下面(D)操作不是激活或顯示屬性列表框的操作

　　A.按快捷鍵F4

　　B.點擊工具欄中的"屬性列表框"按鈕

　　C.選擇"視圖"下拉菜單的"屬性窗口"項

　　D.雙擊窗體中的某一對象

　　15.Visual Basic程序中分隔各語句的字符是(B)

　　A.′

　　B.:

　　C.\

　　D._

　　16.假定窗體的名稱(Name屬性)為Form1，則把窗體的標題設置為"VB Test"的語句為(B)

　　A.Form1 = "VB Test"

　　B.Caption ="VB Test"

　　C.Form1.Text = "VB Test"

　　D.Form1.Name ="VB Test"

　　17.下列不能打開代碼窗口的操作是(D)

　　A.雙擊窗體上的某個控件雙擊

　　B.雙擊窗體

　　C.按F7鍵

　　D.單擊窗體或控件

　　18.Visual Basic程序中語句行的續行符是(D)

　　A.′

　　B.:

　　C.\

　　D. _

　　19.Visual Basic程序中的注釋所使用的字符是(A)

　　A.′

　　B.:

　　C.\

　　D._

　　20.下列說法中正確的是：為了保存一個Visual Basic應用程序，應當(D)

　　A.只保存窗體模塊文件(.frm)

　　B.只保存工程文件(.vbp)

　　C.分別保存工程文件和標準模塊文件(.bas)

　　D.分別保存工程文件、窗體文件和標準模塊文件

　　21.為了使窗體的大小可以改變，必須把它的BorderStyle屬性設置為(B)

　　A.1

　　B.2

　　C.3

　　D.4

　　22.下列說法中正確的是：為了載入一個只有一個工程(此工程下有三個窗體)的Visual Basic應用程序，應當(B)

　　A.只裝入窗體模塊文件(.frm)

　　B.先裝入工程文件(.vbp)即可

　　C.分別裝入工程文件和標準模塊文件(.bas)

　　D.分別裝入工程文件、窗體文件和標準模塊文件

　　23.要使一個標簽能夠顯示所需要的文本，應設置該標簽的(A)屬性的值

　　A.Caption

　　B.Name

　　C.Text

　　D.AutoSize

　　24.要使一個命令按鈕上有圖形，應該設置該按鈕的(A)屬性值，同時設置它的style屬性為1

　　A.Picture

　　B.Style

　　C.DownPicture

　　D.DisabledPicture

　　25.為使計時器對象每隔5秒鐘產生一個時鐘事件(Timer事件)，則其Interval屬性值應設置為(D)

　　A.5

　　B.300

　　C.500

　　D.5000

　　26一個標準的VB應用程序至少要包含一個(C)對象

　　A.文本框

　　B.標簽框

　　C.窗體

　　D.命令按鈕

　　27.要使一個文本框對象能夠顯示多行文字，應設置該對象的(B)屬性值為True

　　A.Text

　　B.MultiLine

　　C.Style

　　D.Visible

　　28.下列的(A)對象支持KeyPress事件

　　A.文本框

　　B.命令按鈕

　　C.標簽框

　　D.圖像框

　　29.若要將窗體從內存中卸載，其實現的方法或語句是(B)

　　A.Show

　　B.Unload

　　C.Load

　　D.Hide

　　30.以下選項中，不是VB標準控件的是(C)

　　A.命令按鈕

　　B.定時器

　　C.通用對話框

　　D.單選框

　　相關推薦：

　　2018年全國計算機等級考試必做試題匯總(各科目)

　　2018年全國計算機等級考試復習知識點匯總(各科目)

　　2018全國計算機等級考試備考經驗及應試技巧匯總