VB語(yǔ)言程序設(shè)計(jì)習(xí)題2

1、第 1 頁(yè) 共 8 頁(yè)vb語(yǔ)言程序設(shè)計(jì)習(xí)題2 一、單項(xiàng)選擇題1.在 visual bsaic代碼中，將多個(gè)語(yǔ)句合并寫在一行上的并行符是（） 。a、撇號(hào) () b、冒號(hào) (:) c 、感嘆號(hào) (!) d 、星號(hào)（ *）2.通過（）可以在設(shè)計(jì)時(shí)直觀地調(diào)整窗體在屏幕上的位置。a、代碼窗口b、窗體布局窗口c 、窗體設(shè)計(jì)窗口d 、屬性窗口3.通過改變選項(xiàng)按鈕 (optionbutton)控件的（）屬性值，可以改變按鈕的選取狀態(tài)。a、value b、style c 、appearance d 、caption 4.為了清除列表框中的所有內(nèi)容，應(yīng)使用的方法是（） 。a、cls b、clear c 、remo

2、ve d 、removeitem 5.文本框能輸入（） 。a、控制字符b、ascii 字符c 、回車d 、文本和數(shù)字第 2 頁(yè) 共 8 頁(yè)6.下列控件中，沒有caption 屬性的是（） 。a、框架b、列表框c 、復(fù)選框d 、單選按鈕7.文本框控件最多能處理（）字節(jié)。a、32k b、64k c 、128k d 、16k 8.以下能夠觸發(fā)文本框change事件的操作是（） 。a、文本框失去焦點(diǎn)b、文本框獲得焦點(diǎn)c 、設(shè)置文本框的焦點(diǎn)d 、改變文本框的內(nèi)容9.要將一個(gè)組合框設(shè)置為簡(jiǎn)單組合框(simple combo) ，則應(yīng)將其 style 屬性設(shè)置為（） 。a、0 b、1 c 、2 d 、3 1

3、0. 要使標(biāo)簽所在處透明顯示背景，應(yīng)把backstyle 屬性設(shè)置為（） 。a、0 b、1 c 、ture d 、false 11. 用（）屬性可唯一標(biāo)志控件陣列中的某一個(gè)控件。a、name b、index 第 3 頁(yè) 共 8 頁(yè)c 、captionu d 、tabindex 12. 組合框控件是將（）組合成一個(gè)控件。a、列表框控件和文本框控件b、標(biāo)簽控件和列表框控件c 、標(biāo)簽控件和文本框控件d 、復(fù)選框控件和選項(xiàng)按鈕控件13. （）使圖象 (image) 控件中的圖象自動(dòng)適宜控件的大小。a、將控件的 autosize 屬性設(shè)為 true b、將控件的 autosize 屬性設(shè)為 false

4、c 、將控件的 stretch屬性設(shè)為 true d 、將控件的 stretch屬性設(shè)為 false 14. 如果要在命令按鈕上顯示圖形文件，應(yīng)設(shè)置命令按鈕的（） 。a、style 屬性和 graphics 屬性b、style 屬性和 picture屬性c 、caption 屬性d 、graphics 屬性15. 以下能夠觸發(fā)文本框change事件的操作是（） 。a、文本框失去焦點(diǎn)b、文本框獲得焦點(diǎn)c 、設(shè)置文本框的焦點(diǎn)d 、改變文本框的內(nèi)容16. 要強(qiáng)制顯示聲明變量， 可在窗體模塊或標(biāo)準(zhǔn)模塊的聲明段中加入語(yǔ)句（） 。a、option base 0 b、option explicit c 、o

5、ption base 1 d 、option compare 17. 設(shè)有聲明： dim x as integer,如果 sgn(x) 的值為 -1，則 x的值是（） 。a、任何整數(shù)第 4 頁(yè) 共 8 頁(yè)b、0 c 、等于 0的整數(shù)d 、小于 0的數(shù)18. 設(shè) s=中華人民共和國(guó) ，表達(dá)式 left （s,1）+right （s,1）+mid（s,3,2 ）的值為（） 。a、中華民國(guó) b、中國(guó)人民 c 、中共人民 d 、人民共和 19. 下面（）是合法的變量名。a、x_yz b、123ab c 、integer d 、x-y 20. 可以同時(shí)刪除字符串前導(dǎo)和尾部空白的函數(shù)是（） 。a、ltri

6、m b、rtrim c 、trim d 、mid 21. 當(dāng)語(yǔ)句 w=iif(410, red,green)執(zhí)行后，變量 w中的值是（） 。a、null b、red c 、green d 、-1 22. inputbox 函數(shù)返回值的類型為（） 。a、數(shù)值b、字符串c 、變體d 、數(shù)值或字符串（視輸入的數(shù)據(jù)而定）第 5 頁(yè) 共 8 頁(yè)23. 在 vb中，默認(rèn)的數(shù)組下標(biāo)的下界從0 開始，要想在通用聲明段界定下界，則應(yīng)使用（） 。a、option base b、option explicit c 、explicit d 、low base 二、多項(xiàng)選擇題1.以下敘述中正確的是（） 。a、打開一個(gè)工

7、程文件時(shí)，系統(tǒng)自動(dòng)裝入與該工程有關(guān)的窗體、標(biāo)準(zhǔn)模塊等文件b、保存 visual basic程序時(shí)，應(yīng)分別保存窗體文件及工程文件c 、visual basic應(yīng)用程序只能以解釋方式執(zhí)行d 、事件可以由用戶引發(fā)，也可以由系統(tǒng)引發(fā)2.以下敘述中錯(cuò)誤的是（） 。a、窗體的 name 屬性指定窗體的名稱，用來標(biāo)識(shí)一個(gè)窗體b、窗體的 name 屬性的值是顯示在窗體標(biāo)題欄中的文本c 、可以在運(yùn)行期間改變對(duì)象的name 屬性的值d 、對(duì)象的 name 屬性值可以為空三、填空題1.表達(dá)式 len( trim(this book ) )的值是 _ ( 注意， this 和 book 后各有一個(gè)空格 ) 2.本文框

8、中的文本改變了，它發(fā)生的事件是_。3.滾動(dòng)條的 _屬性規(guī)定滾動(dòng)條可取的最大值。4.以下程序的運(yùn)行結(jié)果是 _。sub s1(b() as integer) for i = 1 to 4 b(i) = 2 * i 第 6 頁(yè) 共 8 頁(yè)next i end sub private sub command1_click() dim a(1 to 4) as integer for i = 1 to 4 a(i) = i + 5 next i s1 a() for i = 1 to 4 print a(i) next i end sub 5.可以控制菜單項(xiàng)可見或不可見的屬性是_。6.語(yǔ)句 print

9、abs(-62)+int(-62)的輸出結(jié)果是 _。7.如果要改變窗體的標(biāo)題，則需要設(shè)置的屬性是_。四、判斷題1.select case 語(yǔ)句中的測(cè)試表達(dá)式可以是任何形式的表達(dá)式。（）2.調(diào)用通用對(duì)話框控件的showcolor方法，可以打開顏色對(duì)話框。 （）3.窗體的 show方法的作用是將指定的窗體裝入內(nèi)存并顯示該窗體。（）五、程序設(shè)計(jì)題“哥德巴赫猜想”指出，每個(gè)大于6 的偶數(shù)，都可以表示為兩個(gè)素?cái)?shù)的和。試用程序?qū)⒛硞€(gè)給定的數(shù)x 表示為兩個(gè)素?cái)?shù)的和。要求：首先編寫一個(gè)函數(shù)用于判斷一個(gè)數(shù)是否是質(zhì)數(shù)（素?cái)?shù)），然后使用“遍試”算法。第 7 頁(yè) 共 8 頁(yè)vb語(yǔ)言程序設(shè)計(jì)習(xí)題2 答案一、單項(xiàng)選擇題題

10、號(hào)1 2 3 4 5 6 7 8 9 10 答案b b a b d b b d b a 題號(hào)11 12 13 14 15 16 17 18 19 20 答案b a c b d b d b a c 題號(hào)21 22 23 答案c b a 二、多項(xiàng)選擇題題號(hào)1 2 答案abd bcd 三、填空題1、10 2、change 3、max 4、2 4 6 8 5、visible 6、0 7、caption 四、判斷題題號(hào)1 2 3 答案f t t 五、程序設(shè)計(jì)題第 8 頁(yè) 共 8 頁(yè)答案：private sub command1_click() for a = 6 to 100 step 2 for n = 3 to a / 2 step 2 if isprime(n) and isprime(a - n) then print a & = & n & + & (a - n) exit for end if next next end sub function isprime(byval n