2014年計(jì)算機(jī)二級(jí)VB模擬試題及答案（4）

　　11、下列敘述中正確的是( )。

　　A.在窗體的Form_Load 事件過(guò)程中定義的變量是全局變量

　　B.局部變量的作用域可以超出所定義的過(guò)程

　　C.在某個(gè)Sub 過(guò)程中定義的局部變量可以與其他事件過(guò)程中定義的局部變量同名，但其作用域只限于該過(guò)程

　　D.在調(diào)用過(guò)程時(shí)，所有局部變量被系統(tǒng)初始化為0或空字符串

　　12、編寫如下兩個(gè)事件過(guò)程：

　　Private Sub Form_KeyDown (KeyCode As Integer，Shift As Integer)

　　Print Chr(KeyCode)

　　End Sub

　　Private Sub Form_KeyPress(KeyAscii As Integer)

　　Print Chr(KeyAscii)

　　End Sub

　　在一般情況下(即不按住Shift 鍵也未鎖定大寫鍵時(shí))運(yùn)行程序，如果按鍵盤上的"A"鍵，則程序輸出的結(jié)果是(　　)。

　　A.A

　　a

　　B.a

　　A

　　C.A

　　A

　　D.a

　　a

　　13、在窗體上畫一個(gè)命令按鈕，名稱為Co mmand1，然后編寫下列代碼：

　　Option Base 0

　　Private Sub Co mmand1_Click()

　　Di m A1(4)As Integer ，A2(4)As Integer

　　For k =0To 2

　　A1(k +1)=InputBox("請(qǐng)輸入一個(gè)整數(shù)")

　　A2(3-k)=A1(k +1)

　　Next k Print A2(k)

　　End Sub

　　程序運(yùn)行后，單擊命令按鈕，在輸入對(duì)話框中依次輸入2、4、6，則輸出結(jié)果為(　　)。

　　A.0

　　B.1

　　C.2

　　D.3

　　14、下面語(yǔ)句正確的是(　　)。

　　A.If x<3*y And x>y Then y =x^3

　　B.If x<3*y And x>y Then y =3x

　　C.If x<3*y ：x>y Then y =x^3

　　D.If x<3*y And x>y Then y =x**3

　　15、下面程序的輸出結(jié)果是(　　)。

　　Private Sub Co mmand1_Click()

　　Ch$="ABCDEF"

　　proc ch ：Print ch

　　End Sub

　　Private Sub proc(ch As Stri ng)

　　s =""

　　For k =Len(ch)To 1Step -1

　　s =s &Mid(ch ，k ，1)

　　Next k

　　ch =s

　　End Sub

　　A.ABCDEF

　　B.FEDCBA

　　C.A

　　D.F

　　16、語(yǔ)句Di ma(-3To 4，3To 6)As Integer 定義的數(shù)組元素個(gè)數(shù)是(　　)。

　　A.18

　　B.28

　　C.21

　　D.32

　　17、以下敘述中錯(cuò)誤的是(　　)。

　　A.一個(gè)工程中只能有一個(gè)Sub Main 過(guò)程

　　B.窗體的Show 方法的作用是將指定的窗體裝入內(nèi)存并顯示該窗體

　　C.窗體的Hide 方法和Unload 方法的作用完全相同

　　D.若工程文件中有多個(gè)窗體，可以根據(jù)需要指定一個(gè)窗體為啟動(dòng)窗體

　　18、在窗體上先后畫2個(gè)圖片框，名稱分別為Picture1和banana，banana 中添加了香蕉圖片，如圖1所示，且將banana.Drag Mode 屬性設(shè)置為1。要求程序運(yùn)行時(shí)，可以用鼠標(biāo)把banana 拖拽到Picture1中，如圖2所示。能實(shí)現(xiàn)此功能的事件過(guò)程是(　　)。

　　A.Private Sub Form_DragDrop(Source As Control ，XAs Si ngle ，Y As Si ngle)

　　banana . Move Picture1 . Left +X，Picture1 . Top +Y

　　End Sub

　　B.Private Sub banana_DragDrop(Source As Control ，XAs Si ngle ，Y As Si ngle)

　　Source . Move Picture1 . Left +X，Picture 1 . Top +Y

　　End Sub

　　C.Private Sub Picture1_DragDrop(Source As Control ，X As Si ngle ，Y As Si ngle)

　　Source . Move Picture1 . Left +X，Picture1 . Top +Y

　　End Sub

　　D.Private Sub Picture1_DragDrop(Source As Control ，X As Si ngle ，Y As Si ngle)

　　banana . Move banana . Left +X，banana . Top +Y

　　End Sub

　　19、用Print 方法在Forml 窗體中顯示出4個(gè)#號(hào)的正確代碼為(　　)。

　　A.Debug .Print"####"

　　B.Print"####"

　　C.Forml-Print"####"

　　D.Forml .Print"####"

　　20、一個(gè)模塊內(nèi)部各個(gè)元素彼此結(jié)合的緊密程度的度量稱為(　　)

　　A.耦合性

　　B.內(nèi)聚性

　　C.復(fù)雜性

　　D.數(shù)據(jù)傳輸特性