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

　　1.設(shè)有如下程序段：

　　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"對應(yīng)的KeyCode視作相同的字母

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

　　3.執(zhí)行如下兩條語句，窗體上顯示的是(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.該對話框被設(shè)置為"打開"對話框

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

　　C.該對話框的標題為VBTest

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

　　5.設(shè)一個工程由兩個窗體組成，其名稱分別為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

　　運行以上程序，正確的結(jié)果是(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

　　程序運行后，單擊命令按鈕，在窗體上顯示的內(nèi)容是(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.數(shù)組b中的數(shù)范圍為0-100

　　B.c數(shù)組下標的下界從1開始

　　C.GetArray過程的參數(shù)n是按值傳送的

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

　　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

　　程序運行后，單擊命令按鈕，則在窗體上顯示的內(nèi)容是(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

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

　　A.5

　　B.9

　　C.25

　　D.15

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

　　Private Sub File1_DblClick( )

　　x=Shell(File1.FileName,1)

　　End Sub

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

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

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

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

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

　　11.在窗體上畫一個名稱為Label1、標題為"VisualBasic考試"的標簽，兩個名稱分別為Command1和Command2、標題分別為"開始"和"停止"的命令按鈕，然后畫一個名稱為Timer1的計時器控件，并把其Interval屬性設(shè)置為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.單擊"停止"按鈕后再單擊"開始"按鈕，標簽從停止的位置繼續(xù)移動

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

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

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

　　A.面向?qū)ο?/P>

　　B.面向用戶

　　C.面向屏幕

　　D.面向窗體

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

　　A.文件

　　B.工程

　　C.編輯

　　D.視圖

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

　　A.按快捷鍵F4

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

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

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

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

　　A.′

　　B.:

　　C.\

　　D._

　　16.假定窗體的名稱(Name屬性)為Form1，則把窗體的標題設(shè)置為"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程序中語句行的續(xù)行符是(D)

　　A.′

　　B.:

　　C.\

　　D. _

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

　　A.′

　　B.:

　　C.\

　　D._

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

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

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

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

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

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

　　A.1

　　B.2

　　C.3

　　D.4

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

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

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

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

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

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

　　A.Caption

　　B.Name

　　C.Text

　　D.AutoSize

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

　　A.Picture

　　B.Style

　　C.DownPicture

　　D.DisabledPicture

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

　　A.5

　　B.300

　　C.500

　　D.5000

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

　　A.文本框

　　B.標簽框

　　C.窗體

　　D.命令按鈕

　　27.要使一個文本框?qū)ο竽軌蝻@示多行文字，應(yīng)設(shè)置該對象的(B)屬性值為True

　　A.Text

　　B.MultiLine

　　C.Style

　　D.Visible

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

　　A.文本框

　　B.命令按鈕

　　C.標簽框

　　D.圖像框

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

　　A.Show

　　B.Unload

　　C.Load

　　D.Hide

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

　　A.命令按鈕

　　B.定時器

　　C.通用對話框

　　D.單選框

　　相關(guān)推薦：

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

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

　　2018全國計算機等級考試備考經(jīng)驗及應(yīng)試技巧匯總