2016最新二級VB程序設計模擬試題及答案

　　選擇題(每題2分，計60分)

(1)下列可自動設置滾動條的控件是( )

A) 複選框 B) 框架 C) 文本框 D) 標籤框

(2) 計時器控件的(　　)屬性用於設置Timer事件發生的時間間隔。

A) Stretch　B) Interval　　C) Value　　D) Length

(3) 表達式(73+1)*(185-1)的值是( )

A) 6 B) 7.8 C) 8.76 D) 6.67

(4) 函數InStr(“VB程序設計教程”,”程序”)的值為( )

A)1 B)2 C)3 D)4

(5) 有程序代碼如下：

ion=”程序設計”

則label1、caption、”程序設計”分別代表()。

A) 對象、屬性、值 B)對象、值、屬性

C) 對象、方法、屬性　　 D)屬性、方法、值

(6) Inputbox函數返回值的類型是()。

A) 整型數值 B) 字符串 C)變體 D)數值或字符串

(7) 設a=6，則執行 x=IIf(a>5,-1,0)後，x 的值為() 。

A) 5 B) 6 C) 0 D) -1

(8) 產生[60，100]之間的隨機整數的Visual Basic表達式是()。

A) Int(Rnd*40)+60 B) Int(Rnd*40)+61

C) Int(Rnd*41)+60 D) Int(Rnd*41)+61

(9) 執行語句s=Len(Mid("VisualBasic",1,6))後，s的值是

A) Visual 　 B) Basic 　C) 6 　 D) 11

(10) 下面()是合法的變量名。

A) dim B) m-1 C) _123 D) X_t6

(11) 下面正確的賦值語句是()。

A)x=y+3 B)x=y=3

C)x+y=3 D)3x=y

(12)VB提供了結構化程序設計的三種基本結構，三種基本結構是()。

A)遞歸結構、選擇結構、循環結構

B)選擇結構、過程結構、順序結構

C)過程結構、輸入、輸出結構、轉向結構

D)選擇結構、循環結構、順序結構

(13) 確定一個控件在窗體上的位置的屬性是()。

A) Width和Height　B) Width或Height

C) Top和Left D) Top或Left

(14) 在窗體上畫一個名稱為Text1的文本框和一個名稱為Command1的命令按鈕，然後編寫如下事件過程

Private Sub Command1_Click()

= "Visual"

Text1 = "Basic"

Text1 = "Program"

End Sub

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

A) 出錯　 B) Visual 　C) Basic 　 D) Program

(15) 在窗體上畫一個名稱為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

= array1(2, 3) + array1(3, 4)

End Sub

程序運行後，單擊命令按鈕，在文本框中顯示的.值是

A) 15 　　B) 14 　　C) 13 　　D) 12

(16) 設菜單中有一個菜單項為"Open"。若要為該菜單命令設計訪問鍵，即按下Alt及字母O時，能夠執行"Open"命令，則在菜單編輯器中設置“Open"命令的方式是

A) 把Caption屬性設置為&Open B) 把Caption屬性設置為O&pen

C) 把Name屬性設置為&Open D) 把Name屬性設置為O&pen

(17) 在窗體上畫一個名稱為Command1的命令按鈕，然後編寫如下事件過程：

Private Sub Command1_Click()

x=InputBox("Input")

Select Case x

Case 1,3

Print "分支 1"

Case 2,4

Print "分支 2"

Case Else

Print "Else 分支 "

End Select

End Sub

程序運行後，如果在輸入對話框中輸入2，則窗體上顯示的是()。

A) 分支1 B) 分支2 C) Else分支 D) 程序出錯

(18) for k=13 to -5 step -2循環次數為：()。

A) 7 B) 8 C) 9 D) 10

(19)用下面語句定義的數組的元素個數是( )

Dim a(3,1 To 5) As Integer

A)8 B)15 C)20 D)21

(20) 在窗體上畫一個名稱為Command1的命令按鈕，然後編寫如下事件過程：

Private Sub Command1_Click()

a$="Program"

Print String(3,a$)

End Sub

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

A)Pro 　B) ram 　C) gra 　D) PPP

(21) 保存一個工程至少應保存兩個文件，這兩個文件分別是()

A)文本文件和工程文件 B)窗體文件和工程文件

C)窗體文件和標準模塊文件 D)類模塊文件和工程文件

(22) 下列表達式的值為2123的是( )

A) Val("123asd") & 2000 B) Val("123") + 2000

C) Str(123) & "2000" D)Str(123)+"2000"

(23) 表示滾動條控件取值範圍最大值的屬性是()。

A)Max B)LargeChange C)Value D)Max-Min

(24) 當使用Line方法時，參數B與F可組合使用，下列組合中()不允許。

A)BF B)B C)省略不用 D)F

(25)可以RGB(x,y,z)函數獲取顏色，下面的數字對應了x,y,z三個參數，其中不合法的是()。

A)0，0，0 B) 200，255，129 C) 100，256，200 D)255，255，0

(26) 在用菜單編輯器設計菜單時，必須輸入的項有()。

A)快捷鍵 B)索引 C)熱鍵 D)名稱

(27) 在窗體上畫一個命令按鈕，名稱為Command1，然後編寫如下事件過程：

Option Base 0

Private Sub Command1_Click()

Dim city As Variant

city = Array("北京", "上海", "天津", "重慶")

Print city(1)

End Sub

程序運行後，如果單擊命令按鈕，則在窗體上顯示的內容是

A)空白 B)錯誤提示 C)北京 D)上海

(28) 假定有以下函數過程：

Function Fun(S As String) As String

Dim s1 As String

For i = 1 To Len(S)

s1 = UCase(Mid(S, i, 1)) + s1

Next i

Fun = s1

End Function

在窗體上畫一個命令按鈕，然後編寫如下事件過程：

Private Sub Command1_Click()

Dim Str1 As String, Str2 As String

Str1 = InputBox("請輸入一個字符串")

Str2 = Fun(Str1)

Print Str2

End Sub

程序運行後，單擊命令按鈕，如果在輸入對話框中輸入字符串"abcdefg"，則 單擊"確定"按鈕後在窗體上的輸出結果為

A)gfedcba B)ABCDEFG C)GFEDCBA D)abcdefg

(29) Circle(500,600)，500， ， ， ,3將繪製( )。

A)圓弧 B)扇形 C)圓 D)橢圓

(30) 在窗體上畫一個命令按鈕，名稱為Command1，然後編寫如下程序：

Private Sub Command1_Click()

int t1

Static t2

t1=t1+1

t2=t2+1

End Sub

三次單擊命令按鈕後，t1,t2的值分別為()：

A) 1 1 B) 3 3 C) 1 3 D) 3 1

cbaca bdccd adcdd abdcd bbadc ddcdc