2000年秋浙江省高校計算機等級考試試卷-(二級Visual-BASIC)

2000年秋浙江省高校計算機等級考試試卷 (二級Visual BASIC)說明：考生應(yīng)將全部答案寫在答卷上，否則作無效處理?？荚嚂r間為120分鐘。試題一、計算機基礎(chǔ)題（本題共15分）（一） 單選題（每題1分，共10分）1. 軟盤加上寫保護(hù)后，對它可以進(jìn)行的操作是 （1） 。 A只能讀盤，不能寫盤 B只能寫盤，不能讀盤 C既可讀盤，又可寫盤 D不能讀盤，也不能寫盤2. 在語言處理程序中，編譯程序的功能是 （2） 。 A解釋執(zhí)行高級語言程序 B將匯編語言程序編譯成目標(biāo)程序 C解釋執(zhí)行匯編語言程序 D將高級語言程序翻譯成目標(biāo)程序3. 下列有關(guān)計算機病毒的說法中， （3） 是錯誤的。 A游戲軟件常常是計算機病毒的載體 B盡量做到專機專用或安裝正版軟件，是預(yù)防計算機病毒的有效措施 C用消毒軟件將一片軟盤消毒之后，該軟盤就沒有病毒了 D計算機病毒在某些條件下被激活之后，才開始起干擾和破壞作用4. 在Windows95中，桌面是指 （4） 。 A電腦桌 B活動窗口 C文檔窗口 D. 窗口、圖標(biāo)和對話框所在的屏幕背景5. 在Windows95資源管理器窗口的左窗格中，文件夾圖標(biāo)含有“+”時，表示該文件夾 （5） 。 A只含有文件 B是空文件夾 C含有子文件夾 D. 只含有文件而不含有文件夾6. 以下是用十六進(jìn)制表示的兩個連續(xù)的存儲單元的內(nèi)容，其中 （6） 一定不是漢字編碼。 AA0A0H B1234H CBBBBH DABCDH7. 下列有關(guān)Word 97格式刷的敘述中， （7） 是正確的。 A格式刷既可以復(fù)制字體格式也可以復(fù)制段落格式 B格式刷只能復(fù)制字體格式 C格式刷只能復(fù)制段落格式 D格式刷只能復(fù)制純文本的內(nèi)容8. 在Word 97表格中，單元格內(nèi)能填寫的信息 （8） 。 A只能是文字 B只能是文字或符號 C只能是圖像 D文字、符號、圖像均可9. 調(diào)制解調(diào)器的功能是實現(xiàn) （9） 。 A數(shù)字信號與模擬信號的轉(zhuǎn)換 B數(shù)字信號的整形 C模擬信號的放大 D數(shù)字信號的編碼10. 計算機網(wǎng)絡(luò)最突出的優(yōu)點是 （10） 。 A存儲容量大B資源共享C運算速度快D運算精度高（二） 填空題（每題1分，共5分）1. CPU是計算機的核心部件，該部件主要由 (1) 組成。2. 十進(jìn)制數(shù)157.375轉(zhuǎn)換成對應(yīng)的十六進(jìn)制數(shù)是 (2) 。3. 在Windows 95中，要安裝或刪除Windows附件中的部分組件，通常是運行 (3) ，然后使用其中的“添加/刪除程序”功能。4. 在Word 97中，為了看清文檔打印輸出的效果，應(yīng)使用 （4） 視圖。5. 設(shè)有某Internet用戶，其POP主機域名是，帳戶名為sdhong,則相應(yīng)的E-mail地址是 （5） 。試題二、語言基礎(chǔ)題（本題共28分）（一） 判斷題（每題1分，共10分）判斷下列敘述正確與否，正確的打“”，否則打“”。1Visual Basic程序的運行可以從Main()過程啟動，也可以從某個窗體啟動。2同一Form窗體中的各控件可以相互重疊，其顯示的上下層次的次序不可以調(diào)整。3靜態(tài)變量是一種局部變量，當(dāng)原過程再次被執(zhí)行時，靜態(tài)變量的初值是上一次過程調(diào)用后的值。4事件過程由某個用戶事件或系統(tǒng)事件觸發(fā)執(zhí)行，它不能被其它過程調(diào)用。5在圖片框中放置的控件既可以在該圖片框內(nèi)移動，也可以移出該圖片框外。6滾動條控件可作為用戶輸入數(shù)據(jù)的一種方法。7單選鈕控件和復(fù)選框控件都具有Value屬性，它們的作用完全相同。8用鼠標(biāo)選中某菜單控件時，觸發(fā)Click事件；而用鍵盤選中該菜單控件時，觸發(fā)KeyPress事件。9組合框兼有文本框和列表框兩者的功能，用戶可以通過鍵入文本或選擇列表中的項目來進(jìn)行選擇。10在盤驅(qū)動器列表框Drive1的Change事件過程中，代碼Dir1.Path = Drive1.Drive的作用是：當(dāng)Drive1的驅(qū)動器改變時，Dir1的目錄列表隨不同驅(qū)動器作相應(yīng)改變。（二） 單選題（每題1分，共6分）1. 要改變控件的寬度，應(yīng)修改該控件的 （1） 屬性。 A Top B Left C Width D Height2. 將命令按鈕Command1設(shè)置為不可見，應(yīng)修改該命令按鈕的 （2） 屬性。 A Visible B Value C Caption D Enabled3. 單擊滾動條兩端的任一個滾動箭頭，將觸發(fā)該滾動條的 （3） 事件。 A Scroll B KeyDown C Change D Dragover 4. （4） 對象具有Clear方法。 A. 圖片框 B. 窗體 C. 復(fù)選框 D. 列表框5重新定義圖片框控件的坐標(biāo)系統(tǒng)，可采用該圖片框的 （5） 方法。 A. Scale B. ScaleX C. ScaleY D. SetFocus6. 將通用對話框CommonDialog1的類型設(shè)置成另存為對話框，可調(diào)用該控件的 （6） 方法。 A. ShowOpen B. ShowSave C. ShowColor D. ShowFont（三） 填空題（每題2分，共12分）1下列代數(shù)式的Visual Basic表達(dá)式是 。2設(shè)x為大于零的實數(shù)，則大于x的最小奇數(shù)的Visual Basic表達(dá)式是 。3a1和a2之中有且只有一個與a3的值相等，相應(yīng)的Visual Basic邏輯表達(dá)式是 。4設(shè)init的初值為10，則由下列循環(huán)語句控制的循環(huán)次數(shù)是 。 Do While init=5 init=init-1 loop5在Visual Basic中，變量從它的作用范圍來看，可分為 、 和 三種。6語句Picture1.Circle (800,1000),500的含義是 。試題三、程序閱讀題（本題共21分)閱讀下列程序，寫出運行結(jié)果。1. 程序(5分) Private Static Sub Command1_Click() Dim x As Integer, s As Integer x = Val(InputBox(請輸入一個正整數(shù)=) If x i a = a + x x = x + 3 Loop End Sub 寫出程序運行時連續(xù)三次單擊Command1后，a1.dat文件的最終結(jié)果。試題四、程序填空題(每空2分，共18分) 1. 程序說明： 利用一個計時器、一個標(biāo)簽框和二個命令按鈕制作一個動態(tài)秒表，如圖1所示。單擊“開始”命令按鈕，秒表開始計時，單擊“結(jié)束”命令按鈕，秒表結(jié)束計時，并在標(biāo)簽框顯示運行時間，如“運行了0小時2分10秒”。（假設(shè)對象的屬性都在程序代碼中設(shè)定）圖1 程序代碼如下： Dim x As Long Dim h As Integer, m As Integer, s As Integer Private Sub Form_Load() Form1.Caption = 動態(tài)秒表（小時：分：秒） Command1.Caption = 開始&S Command2.Caption = 結(jié)束&E Label1.Alignment = 2 居中對齊 Label1.Caption = 0: 0: 0 Timer1.Interval = Timer1.Enabled = False x = 0 End Sub Private Sub Command1_Click() End Sub Private Sub Command2_Click() Timer1.Enabled = False x = Label1.Caption = 運行了+Str(h)+小時+Str(m)+分+Str(s)+秒 End Sub Private Sub Timer1_Timer() x = x + 1 h = m = (x Mod 3600) 60 s = Label1.Caption = Str(h) + : + Str(m) + : + Str(s) End Sub 2. 程序說明：已知自然對數(shù)的底數(shù)e的級數(shù)表示如下： 本程序利用函數(shù)過程fact()求e,其中絕對值小于1E-8的項被忽略。程序代碼如下： Private Function fact(m As Integer) As Single 求m!的函數(shù) Dim x As Single, i As Integer x = 1 For i = 1 To m x = Next i fact = x End Function Private Sub Form_Click() Dim e As Single, item As Single Dim n As Integer e = 1: n = Do n = n + 1 item = e = e + item Loop While Form1.Print e=; e End Sub 試題五、程序設(shè)計題(本題共18分) 1隨機產(chǎn)生n個兩位正整數(shù)（n由輸入對話框輸入，且n0），求出其中的偶數(shù)之和，并在標(biāo)簽框Label1上顯示。(8分） 注：程序?qū)懺诿畎粹oCommand1的Click事件中。 2. 由輸入對話框輸入100個數(shù)值數(shù)據(jù)放入數(shù)組a。將其中的整數(shù)放入數(shù)組b，然后運用選擇分類法將數(shù)組b中的數(shù)據(jù)按從大到小的順序排列，并以每行5個數(shù)據(jù)在窗體上輸出。（10分） 注：程序?qū)懺诖绑wForm的Click事件中。2000年秋浙江省高校計算機等級考試參考答案(二級Visual BASIC)試題一、計算機基礎(chǔ)題（本題共15分）（一）單選題（每題1分，共10分）(1)A(2)D(3)C(4)D(5)C(6)B(7)A(8)D(9)A(10)B（二）填空題（每題1分，共5分）(1)控制器和運算器(2)9D.6(3)控制面板(4)頁面(5)試題二、語言基礎(chǔ)題（本題共28分）（一）判斷題（每題1分，共10分）1 2 3 4 5 6 7 8 9 10 （二）選擇題（每題1分，共6分）(1） C (2） A （3） C （4） D （5） A (6） B （三）填空題（每題2分，共12分）1. （x5-Cos(29*3.14/180)）/(Sqr(Exp(x)+log(y)+5) 2. (Int(x)+1)2)*2+1 (或 (Fix(x)+1)2)*2+1) 3. a1=a3 Xor a2=a3 (或 a1=a3 And a2a3 Or a1a3 And a2=a3) 4. 6 5. 全局變量 、 模塊級變量 和 局部變量 6. 以圖片框Picture1中的(800,1000)為圓心，以500為半徑畫一個圓 試題三、程序閱讀題（本題共21分)1. （5分） s= 5 s= 10 s= 40 2.（分） w= 3 k= 2 w= 4 k= 4 w= 5 k= 6 w= 6 k= 83. (5分) L H F D B(6分) y= 5 a= 5 y= 15 a= 10 y= 30 a= 15試題四、程序填空題(每空2分，共18分)1. (1) 1000 (2) Timer1.Enabled = True 或 Timer1 = True (3) 0 (4) x 3600 (5) x Mod 60 2. (6) x * i (7) 0 (8) 1 / fact(n) (9) Abs(item) =0.00000001 試題五、程序設(shè)計題(本題共18分)1.程序如下:（8分） Private Sub Command1_Click() Dim n As Integer, Osum As Long, x As Integer n = Val(InputBox(請輸入數(shù)據(jù)n) Hsum = 0 For i = 1 To n x = Int(Rnd * 90 + 10) If x Mod 2 = 0 Then Osum = Osum + x Next i Label1.Caption = 偶數(shù)之和= + Str(Osum) End Sub2.程序如下:（10分） Private Sub Form_Click() Const n = 100 Dim a(1 To n) As Single Dim b(1 To n) As Long, t As Long Dim m As Integer, i As Integer, j As Integer m = 0 For i = 1 To n a(i) = Val(InputBox