2016計算機二級vb考試題及答案

來源:文萃谷 2.38W

計算機二級vb的學習內容:按照新大綱,需要學習的內容有:VB基本概念、集成開發環境、可視化編程方法、基本輸入輸出、常用控件功能及使用、VB控制結構語句等。

2016計算機二級vb考試題及答案

以下是計算機二級vb的考試模擬試題,希望對大家的複習有所幫助!

  單選題

1、

A.n As Integer j As Integer

B.n As Integer Static j As Integer

l n As Integer J As Integer

l n As Integer Static j As Integer

2、 下列各種窗體事件中,不能由用户觸發的事件是(  )。

事件和Unload事件

k事件和Unload事件

k事件和DblClick事件

事件和Initialize事件

3、

A.4321

B.12

C.34

D.1234

4、 在窗體上用複製、粘貼的方法建立了一個命令按鈕數組,數組名為ComTest1。設窗體Form1標題為“MyForm1”.雙擊控件數組中的第3個按鈕,打開代碼編輯器,編寫如下代碼:

Privae Sub ComTest 1_Click(Index As Integer)

ion=”MyForm2”

End Sub

運行時,單擊按鈕數組中的第1個按鈕,則窗體標題顯示為(  )。

1

est1

rm1

rm2

5、 下列操作中不能向工程中添加窗體的是(  )。

A.執行“工程”菜單中的“添加窗體”命令

B.單擊工具欄上的“添加窗體”按鈕

C.右擊窗體,在彈出的菜單中選擇“添加窗體”命令

D.右擊工程資源管哩器,在彈出的菜單中選擇“添加”命令,然後在下一級菜單中選擇“添加窗體”命令

6、 下面程序運行時,若輸入“Visual Basic Programming”,則在面體上輸出的是(  )。

A.3

B.2

C.1

D.0

7、 下列關於窗體的描述中,錯誤的是(  )。

A.窗體的Height、Width屬性用於設置窗體的高和寬

B.窗體的Load事件在加載窗體時發生

C.當窗體的Enabled屬性為False時,通過鼠標和鍵盤對窗體的操作都被禁止

D.執行UnLoad Form1語句後,窗體Form1消失,但仍在內存中

8、 設已經在窗體上添加了一個通用對話框控件CommonDialogl,以下語句正確的是(  )。

er=ALLL Files |*.*|=|Pictures(*.Bmp)|*.Bmp

er="ALLL Files"|*.*|"Pictures(*.Bmp)"|*.Bmp

er={ALLL Files{|*.*|Pictures(*.Bmp)|*.Bmp}

er="ALLL Files |*.*|Pictures(*.Bmp)|*.Bmp"

9、 窗體上建立了一個名為CommonDialong1的通用對話框,用下面的語句建立一個對話框:

Comm,on=2,則以下語句與之等價的是(  )。

Open

Save

Color

Font

10、如果一個直線控件在窗體上呈現為一條垂直線,則可以確定的是(  )。

A.它的`Y1、Y2屬性的值相等

B.它的X1、X2屬性的值相等

C.它的X1、Y1屬性的值分別與X2、Y2屬性的值相等

D.它的X1、X2屬性的值分別與Y1、Y2屬性的值相等

11、窗體上有一個名稱為Framel的框架(如圖),若要把框架上顯示的“Framel”改為漢字“框架”,下面正確的語句是( )

{Page}

12、以下關於過程及過程參數的描述中,錯誤的是( ){Page}

13、

14、

15、 下列控件屬性中,屬性值的類型不相同的一項是(  )。

l控件的Enabled屬性與TextBox控件的Enabled屬性

onBraon控件的Value屬性與CheckBox控件的Value屬性

antt控件的Default屬性與Command控件的Cancel屬性

and控件的Ⅵsible屬性與Frame控件的Ⅵsible屬性

16、 下列不能打開]:具箱窗口的操作是(  )。

A.執行“視圖”菜單中的“工具箱”命令

B.按Alt+F8鍵

C.單擊工具欄上的“工具箱”按鈕

D.按Alt+V,然後按Alt+X鍵

17、

A.9 8 7 6 3 2

B.2 3 6 7 8 9

C.9 8 7 6 3

D.2 3 6 7 8

18、為達到把a、b中的值交換後輸出的目的,某人編程如下:{Page}

Private Sub Command1_Click()

a%=10:b%=20

Call swap(a,B.:Print a,b

End Sub

Private Sub swap(ByVal aAs Integer,ByVal bAs Integer)

c=a:a=b:b=c

End Sub

在運行時發現輸出結果錯了,需要修改。下面列出的錯誤原因和修改方案中正確的是。

A.調用swap過程的語句錯誤,應改為:Call swap a,b

B.輸出語句錯誤,應改為:Print “a”,“b”

C.過程的形式參數有錯,應改為:swap(ByRef a As Integer,ByRef b As Integer)

中3條賦值語句的順序是錯誤的,應改為a=b:b=c:c=a

19、

  填空題

20、下面的程序執行時,可以從鍵盤輸入一個正整數,然後把該數的每位數字按逆序輸出。例如:輸入7685,則輸出5 8 6 7;輸人1000,則輸出0 0 0 1。請填空。

Private Sub Command1_Click()

Dim x As Integer

X=InputBox(“請輸入一個正整數”)

While x> 【11】

Print x Mod 10;

x=x10

Wend

Print 【12】

End Sub

熱門標籤