VisualBasic程序設(shè)計試卷5

1、1 / 11QQ:401999419全國計算機等級考試二級筆試試卷Visual Basic 語 言 程 序 設(shè) 計 （一 ）、單項選擇題（每小題 2 分，共 70 分）1. 在 VB 的工程中，窗體文件的擴展名是A、frmB、vbg2.3.C、vbpD、basVB 和傳統(tǒng)高級語言相比，最顯著的特點是A、結(jié)構(gòu)化編程C、米用事件驅(qū)動機制D、B、模塊化編程可以訪問數(shù)據(jù)庫打開屬性窗口，其快捷鍵是A、 F1C、 F54. 下列哪個詞語代表雙擊A、 ClickB、 F4D、 F7B、 DblClickC、 DoubleClick5.語句 Dim a!，其中！代表 a 的類型為A、 IntegerD、 Mo

2、useClickB 、 LongC、 SingleD 、Double6. 如果通過鍵盤訪問菜單，可在菜單的標題中某個字母前插入符號A、 $B、C、 &D、 #2 / 117.若 x 是兩位的隨機正整數(shù)(10 x0 And b= 6 Then Exit ForNext iPrint sA、 5B、 6C、 8 D、 1020. 決定窗體是否可見，所采用的屬性為B、取消C、確定”和“取消”D、是和“否”15.表達式 Right(Nice to see you,3)的值是A、 Nice to seeB、 NicC、 youD、 Nice to see you16.表達式 Format(123

3、4.56, 0,000.000)的值是17.A、1234C、 1234.560表達式 String(2,97)的值是A、 AAB、D、B、01234.5601,234.560aaD、 9918.19.列程序段的執(zhí)行結(jié)果為5 / 11A、ForeColorB、VisibleC、 Enabled21. 定義靜態(tài)變量所使用的名稱是A、PublicC、Static22. 下列程序段的執(zhí)行結(jié)果為For I = 1 To 10 x = x + 1Next IPrint IA、 4C、1023. 下列的程序段執(zhí)行后， n 的值為For i = 1 To 3For j = 1 To in = n + 1Nex

4、t jNext iPrint nA、3C、524. 下列的程序段執(zhí)行后， s 的值為D、WindowStateB、PrivateD、DimB、5D、11B、6D、4For i=1 To 1006 / 11s=s+iNext iA、5050C、10125. 命令按鈕不能響應(yīng)的事件是A、MouseUpC、Click26. 以下程序段執(zhí)行后結(jié)果是n = -1Do While i 0n = n + 1LoopPrint nA、1C、-127. 可決定窗體的是否有最大化按鈕的屬性是 A、BorderStyleC、ControlBox28. 算式表達式 兇+e2在 VB 的中表示形式為A、Abs(x)+E

5、xp(2)B、B、100D、5000B 、 MouseDownD、DblClickB、0D、死循環(huán)B 、 MinButtonD、 MaxButtonAbs(x)+Ln(2)Atn( x)+eA27 / 11C、Sqr(x)+Exp(2)D、29. 下列程序的執(zhí)行結(jié)果是f1 = 1: f2 = 18 / 11For i = 1 To 3 f3 = f2 + f1 f1 = f2 f2 = f3Next iPrint f3A 、 2B、 3C、5D、 630. 下列程序的執(zhí)行結(jié)果是a=100b=50If a = b Then Max = aElse Max = bPrint MaxA 、 50B、

6、 10C、150D、 10031. 下列程序段執(zhí)行后， x 的值為For I = 2 To 6 Step 2x = x + 1Next IPrint xA、6C、432. 為了按下鍵盤上 ESC 鍵能執(zhí)行某個命令按鈕的 Click 事件，需要設(shè)置該命令B、5D、39 / 11按鈕的屬性為 TrueA、CancelC、Enabled33. 下列程序的運行結(jié)果為 a=9Select Case aCase is10Print a+1Case is15Print a*aEnd SelectA、81C、1134. 以下程序輸出 1 到 1000 之間所有的偶數(shù)的和，橫線上的語句為Private Sub

7、Command1_Click()Dim x As LongFor i = 1 To 1000If Thenx = x + iNext iPrint xEnd SubA 、 i Mod x=0B 、 x mod 2=0C、i mod 2=0D 、x mod 20B、DefaultD、 VisualB、12D、1010 / 1135. 刪除列表框中所有列表項的方法是B、ClearD、Removeitem二、填空題（每空 2 分，共 30 分）1. 為了改變計時器控件的時間間隔，應(yīng)該修改該控件的【1】屬性。2. 如圖所示界面，窗體含有三個命令按鈕，分別為Command1、Command2 和Priv

8、ate Sub Comma nd1_Click()Command1.【2 】=FalseEnd Sub(2)單擊“失效”按鈕，按鈕變?yōu)榛疑玃rivate Sub Comma nd2_Click()Command2.【3 】 =FalseEnd Sub(3)單擊“結(jié)束”按鈕，程序終止運行Private Sub Comma nd3_Click()【4】A、CisC、RemoveCommand3,根據(jù)要求將程序補充完整。(1)單擊“隱藏”按鈕，按鈕消失11 / 11End Sub3.在窗體上畫一個名稱為 Labell 的標簽和一個名稱為 Listl 的列表框。程序運行后，在列表框中添加若干列表項。當(dāng)

9、雙擊列表框中的某個工程時，在標簽 Labell 中顯示所選中的工程Private Sub Form_Load()Listl.Addltem 北京Listl.Addltem 上海List1.AddItem 河北End SubPrivate Sub【5 】()Label1.Caption =【6 】End Sub4. 執(zhí)行下面的程序段后，變量 s 的值為【7】s = 5For i = 2.6 To 4.9 Step 0.6s = s + 1Next5. 以下程序程序段運行后，輸出結(jié)果為【8】a = 3: b = 5: c = 8If a b The n M二a Else M = bIf c M T

10、he n M二c12 / 11Print M6. 如圖所示界面，窗體含有一個文本框一個水平滾動條，分別為Hscrolll，根據(jù)要求將程序補充完整(1)初始化時，水平滾動條的最大改變量為5Private Sub Form_Load()HScrolll.Min = 10HScrolH.Max = 100HScroll1.SmallCha nge = 2HScrolll.【9 】=5End Sub(2) 通過水平滾動條來改變文本框中字符的大小Private Sub HScroll1_Cha nge()Textl.FontSize =【10 】End Sub7. 以下程序的功能是：生成 20 個 200 到 300 之間的隨機整數(shù)，輸出其中能被 5 整除的數(shù)并求出它們的和Private Sub Comma nd1_Click()Textl 和13 / 11For i = 1 To 20 x = Int(【11 】*200 + 100)If【12 】Thens = s +【13】End IfNextPrint sum=。sEnd Sub8.如圖所示界面，窗體含有一個文本框 Textl ,兩個復(fù)選框 Checkl 和Check2，兩個單選按鈕 Option1 和 Option2,根據(jù)要求將程序補充完整。(1)