一、選擇題：35題，2分/題，共70分

下列各題A)、B)、C)、D)四個選項中，只有一個選項是正確的，請將正確選項涂寫在答題卡相應位置上，答在試卷上不得分。

1.假定窗體有一個標簽，名為Label1,為了使該標簽透明并且沒有這框，則正確的屬性設置為(?)

A)Label1.Backstyle=0?Label1.BorderStyle=0

B)Label1.Backstyle=1?Label1.BorderStyle=1

C)Label1.Backstyle=True?Label1.BorderStyle=True

D)Label1.Backstyle=False?Label1.BorderStyle=False

分析:

2.通過改變單選按鈕(Option?Button)控件的(?)屬性值，可以改變按鈕的選取狀態。

A)value

B)Style

C)Appearance

D)Caption

分析:

3.以下語句用于打開一個順序文件Open"C:\MyFile.txt"For?OutPut,但是該語句的一個重要錯誤是沒有(?)

A)指定打開方式

B)指定文件號

C)指定打開文件名

D)指定文件類型

分析:

4.假定有如下的Sub?過程：

Sub?S(x?As?Single,?y?As?Single)

t?=?x

x=t?/?y

y=t?Mod?y

End?Sub

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

Private?Sub?Command1_Click()

Dim?a?As?Single

Dim?b?As?Single

a=5

b=2

S?a,?b

Print?a,?b

End?Sub

程序運行后，單擊命令按鈕，輸出結果是(?)

A)5?2

B)1?1

C)1.25?4

D)2.5?1

分析:

5.如果要在程序中顯示一個彈出式菜單，那么要調用Visual?Basic中提供的(?)方法。

A)Print

B)Move

C)Refresh

D)PopupMenu

分析:

6.假定有以下兩個過程：

Private?Sub?PPP?(a?As?Single,?b?As?Single)

a?=?a?+?b

Print?a?,?b

b?=?a?+?b

Print?a,?b

End?Sub

Private?Sub?Form_Activate()

x=18

Call?PPP?((x),(x))

Print?x

End?Sub

則以下說法中不正確的是(?)

A)虛參是?a?和b?，兩個實參(x)和(x)允許重名

B)虛參是?a?和b?，實參(x)表示是傳值調用

C)虛參是?a?和b?，實參(x)表示是非傳址調用

D)虛參是?a?和b?，兩個實參(x)和(x)不允許重名

分析:

7.在窗體上畫一個列表框和一個文本框，然后編寫如下兩個事件過程：

Private?Sub?Form_Load()

List1.AddItem"357"

List1.AddItem"246"

List1.AddItem"123"

List1.AddItem"456"

Text1.Text=""

End?Sub

Private?Sub?List1_DblClick()

M?=?List1.Text

Print?M?+?Text1.Text

End?Sub

程序運行后，在文本框中輸入“123”，然后雙擊列表框中的“456”，則輸出結果為(?)

A)1245

B)456123

C)123456

D)0

分析:

8.用(?)屬性可惟一標志控件陣列中的某一個控件。

A)?Name

B)?Index

C)?Caption

D)?TabIndex

分析:

9.為了把一個記錄型變量的內容寫入文件中指定的位置，所使用語句的格式為(?)

A)Get?文件名，記錄號，變量名

B)Get?文件號，變量名，記錄號

C)Put?文件號，變量名，記錄號

D)Put?文件號，記錄號，變量名

分析:

10.閱讀程序：

Function?F?(?a?As?Integer)

b?=?0

Static?c

b=?b?+?1

c=?c?+?2

F=?a?+?b?+?c

End?Functon

Private?Sub?Command1_Click()

Dim?a?As?Integer

a?=?2

For?i?=?1?to?3

Print?F(a)

Next?i

End?Sub

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

A)?4?5?6

B)?5?7?9

C)?4?6?8

D)?4?7?9

分析:

來源:-計算機二級考試

11.惟一能區別一個控件屬性的是(?)

A)Caption

B)Text

C)Name

D)Index

分析:

12.以下描述正確的是(?)

A)過程的定義可以嵌套，但過程的調用不能嵌套

B)過程的定義不可以嵌套，但過程的調用可以嵌套

C)過程的定義和過程的調用均可以嵌套

D)過程的定義和過程的調用均不能嵌套

分析:

13.用Dim?AABB(-2?to?10,?4?to?8,1)聲明的是一個(?)維數組。

A)1

B)2

C)3

D)4

分析:

14.在VB代碼中，將多個語句合并寫在一行上的并行符是(?)

A)撇號(’)

B)冒號(：)

C)感嘆號(！)

D)星號(*)

分析:

15.如果在立即窗口中執行以下操作：

a?=?8?(是回車鍵，下同)

b?=?9?Print?a?>?b?則輸出結果是(?)

A)-1

B)0

C)False

D)True

分析:

16.在窗體上畫兩個文本框(其Name屬性分別為Text1和Text2)和一個命令按鈕(其Name?屬性為Command1)，然后編寫如下事件過程：

Private?Sub?Command1)_Click()

x=0

Do?Until?x?>?=?50

x=?(x?+?4)*(x?+?3)

n=?n+1

Loop

Text1.Text=Str(n)

Text1.Text=Str(x)

End?Sub

程序運行后，單擊命令按鈕，在兩個文本框中顯示的值分別為(?)

A)1?和?0

B)2?和240

C)3?和?50

D)4?和168

分析:

17.在窗體上畫一個文本框，然后編寫如下事件過程：(?)

Private?Sub?Text1_KeyPress?(KeyAscii?As?Integer)

Dim?char?As?String

char=Chr?(KeyAscii)

KeyAscii=Asc(UCase(char))

Text1.Text=String(6,?KeyAscii))

End?Sub

A)a

B)A

C)aaaaaa

D)AAAAAA

分析:

18.編寫如下事件過程:

Private?Sub?Form_KeyDown(KeyCode?As?Integer,Shift?As?Integer)

If(Button?And?3)=3?Then

Print?"AAAA"

End?If

End?Sub

程序運行后，為了在窗體上輸出“AAAA”,應該下的鼠標鍵為(?)

A)左

B)右

C)同時按下左、右

D)按什么鍵都不顯示

分析:

19.用于去掉一個字符串的右邊的空白部分的函數是(?)

A)RTrim()

B)Right()

C)Asc()

D)Time()

分析:

20.下列哪條語句是錯的(?)

A)RTrim()

B)Exit?Function

C)Exit?While

D)Exit?Do

分析: 來源:-計算機二級考試

21.設?a=?8,則執行x=IIF(a?>?10?,-1,0)后，x?的值為(?)

A)5

B)6

C)0

D)-1

分析:

22.Visual?Basic?一共有設計、運行和中斷三種模式，要使用調試工具應該(?)

A)進入設計模式

B)進入運行模式

C)進入中斷模式

D)不用進入任何模式

分析:

23.如何使圖像(Image)控件中的圖像自動適宜控件的大小?(?)

A)將控件的AutoSize屬性設為True

B)將控件的AutoSize屬性設為False

C)將控件的Stretch屬性設為True

D)將控件的Stretch屬性設為False

分析:

24.如果要在程序代碼中為圖片框動態加載和清除圖像，可以利用(?)函數。

A)InputBox

B)Input

C)LoadPicture

D)PaintPicture

分析:

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

Private?Sub?Command1_Click()

x?=?0

Do?Until?x?=?-1

a?=?InputBox("請輸入?a?的值")

a?=?Val?(a)

b?=?InputBox("請輸入?b?的值")

b?=?Val?(b)

x?=?InputBox("請輸入?x?的值")

x?=?Val(x)

a?=?a?+?b?+?x

Loop

Print?a

End?Sub

程序運行后，單擊命令按鈕，依次在輸入對話框中輸入?10、8、9、2、11、-1，則輸出結果為(?)。

A)12

B)13

C)14

D)15

分析:

26.函數過程(用Function定義)與子過程(用Sub?定義)的最大區別是(?)

A)函數過程有返回值

B)子過程有返回值

C)函數過程可以帶參數

D)子過程可以帶參數

分析:

27.Visual?Basic根據計算機訪問文件的方式將文件分成三類，其中不包括(?)

A)順序文件

B)Unix文件

C)二進制文件

D)隨機文件

分析:

28.要顯示當前過程中的所有變量及對象的取值，可以利用(?)窗口。

A)數據

B)調用堆棧

C)立即

D)本地

分析:

29.符號％是聲明(?)類型變量的類型定義符。

A)Integer

B)Variant

C)Single

D)String

分析:

30.Visual?Basic?中窗體文件的擴展名是(?)

A)VBP

B)FRM

C)VBW

D)PDM

分析:

來源:-計算機二級考試

31.關于MDI窗體下列說法正確的是(?)

A)一個應用程序可以有多個MDI窗體

B)子窗體可以移動MDI窗體以外

C)不可以在MDI窗體上放置按鈕控件

D)MDI窗體的子窗體不可以擁有菜單

分析:

32.窗體在屏幕上顯示后有(?)方法可以清除它。

A)1種

B)2種

C)3種

D)4種

分析:

33.假定在窗體上建立一個通用對話框，其名稱為CommonDialog1,用下面的語句可以建立一個對話框：

CommonDialong1.Action?=?4

與該語句等價的語句是(?)

A)CommonDialong1.ShowOpen

B)CommonDialong1.ShowFont

C)CommonDialong1.ShowColor

D)CommonDialong1.ShowSave

分析:

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

Option?Base?1

Private?Sub?Command1_Click()

Dim?a

a=Array?(1,3,5,7,9)

j?=?1

For?i?=?5?to?1?Step?-1

s=?s?+a(i)?*?j

j=?j?*?10

Next?i

Print?s

End?Sub

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

A)97531

B)135

C)957

D)13579

分析:

35.下列語句都是在Form?中定義的，(?)是錯的。

A)Public?Const?A1?=?2u

B)Private?Const?A2?=?8

C)Public?a3?As?Integer

D)Private?a4?As?Integer

分析:

二、填空：每空2分，共30分。

1.閱讀以下程序：

Private?Sub?Form_Click()

Dim?k,n?,m,?As?Integer

n?=?10

m?=1

k?=1

Do?While?k?

m?=?m?+?2

k?=?k?+?1

Loop

Print?m

End?Sub

單擊窗體，程序的執行結果是[1]

2.當用[2]方式打開文件時，如果對文件進行寫操作，則寫入的數據附加到原來文件的后面。

3.組合框有3種不同的類型，這3種類型是下拉式列表框、簡單組合框和[3],分別通過把[4]屬性設置為2、1、0來實現。

4.為了在按下ESC鍵時執行某個命令按鈕的事件過程，需要把該命令按鈕的一個屬性設置為True,這個屬性是[5]。

5.在執行KeyPress事件過程時，KeyASCII是所按鍵的[6]值。對于有上檔字符和下檔字符的鍵，當執行KeyDown事件過程時，KeyCode是[7]字符的[8]值。

6.在窗體上面畫一個命令按鈕，然后編寫如下程序:

Function?M?(x?As?Integer,?y?As?Integer)?As?Integer

M?=IIf?(X?>y?,x,y)

End?Function

Private?Sub?Command1_Click()

Dim?a?As?Integer,?b?As?Integer

a?=?1

b?=?2

Print?M?(a,b)

End?Sub

程序運行后，單擊命令按鈕，輸出結果為[9]

7.在窗體上畫兩個文本框，其名稱分別為Text1和Text2，然后編寫如下事件過程：

Private?Sub?Form_Load()

Show

Text1.Text=""

Text2.Text=""

Text2.SetFocus

End?Sub

Private?Sub?Text2_KeyDown(KeyCode?As?Integer,Shift?As?Integer)

Text1.Text=?Text1.Text?+Chr(KeyCode?-?4?)

End?Sub

程序運行后，如果在Text2文本框中輸入“efghi”,則Text1文本框中的內容為[10] 來源:-計算機二級考試

8.執行下面的程序段后，b的值為[?]

a?=?800

b?=?30

a?=?a?+?b

b?=?a?-?b

a?=?a?-?b

9.為了執行自動施放，必須把[12]屬性設置為[13],而為了執行手動拖放，必須把該屬性設置為[14]

10.讀下列程序：

Private?Sub?Form_Click()

Static?x(4)?As?Integer

For?i?=?1?to?4

x(i)?=x?(i)?+?i?*?3

Next?i

Print

For?i?=?1?to?4

print?"x("；i；")?="；x(i)

Next?i

End?Sub

該程序在運行了三次后，其最終結果是：[15]

二級VB模擬試卷(三)參考答案

一、(1)A?(2)A?(3)B?(4)D?(5)D?(6)D?(7)B?(8)B?(9)D?(10)B?(11)C?(12)B?(13)C?(14)B?(15)C?(16)B

(17)D?(18)D?(19)A?(20)C?(21)C?(22)C?(23)C?(24)C?(25)A?(26)A?(27)B?(28)D?(29)A?(30)B

(31)C?(32)B?(33)B?(34)D?(35)A

分析:

二、[1]21?[2]Append?[3]下拉式組合框?[4]Style?[5]Cancel?[6]ASCII?[7]下檔字符?[8]ASCII

[9]2?[10]ABCDE?[11]800?[12]DragMode?[13]1?[14]0

[15]x(1)=9?x(2)=18?x(3)=27?x(4)=36來源:-計算機二級考試

總結

以上是生活随笔為你收集整理的计算机等级考试模拟题卷子,二级VB模拟试卷 1的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。