【正文】 假定某出租車行程為 x千米，計費標準如下： 當 x≤ 3千米時，計費為 5元； 當 3x≤ 10千米時，計費為 5+（ x3） 當 x10千米時，計費為 5+（ 103） +(x10) 程序界面如圖 VB1所示，在文本框 Text1中輸入行駛里程數(shù)（單位：千米），單擊 開始計算 按鈕（ Command1）后，在標簽 Label3輸出計費結果。 3. 以下 Visual Basic程序的功能是 ： 計算表達式 1 3＋ 2 3＋ 3 3＋… 100 3的值 ， 并在文本框 Text1中輸出計算結果。 程序界面如圖 VB1所示，在文本框 Text1中 輸入一個正整數(shù)，單擊 開始轉換 按鈕（ Command1）后，對應的二進制數(shù)在標簽 Label3中顯示出來。 3． 以下 Visual Basic程序的功能是 ： 計算表達式 1＋ 3＋ 9＋ 27＋ 81＋… 2187的值 ，并在文本框 Text1中輸出計算結果。 解決此問題的算法流程圖如圖 VB2所示，相應的程序如下，程序中變量 n表示總的運動員人數(shù)，在程序 (1)和 (2)劃線處，填入適當?shù)恼Z句或表達式，把程序補充完整。 4． 團體總分統(tǒng)計。n保存學生總人數(shù) i = i + 1 If x = a(i) Then f = True End If Loop If f = True Then _____(2)____ Else s = 查無此人！ End If = s End Sub 程序中 (1)劃線處應填入 ___________________ 程序中 (2)劃線處應填入 ___________________ 圖 VB－ 1 圖 VB2 六、 1． 有如下 Visual Basic程序段 ： a = Test b = is c = easy c = a + b + c 該程序段運行后 ， 變量 c的值為 ____________。 程序界面如圖 VB1所示，左邊列表框列出所有同學的卡號和姓名，在右邊文本框 Text1中輸入卡號，單擊 開始查詢 按鈕（ Command1），程序就按卡號進行查找，如果找到就在標簽 Label3中輸出卡號對應同學的姓名，否則就輸出 查無此人 。 （ 2）循環(huán)剛退出時，變量 i的值為 _________。 解決此問題的算法流程圖如圖 VB2所示，相應的 Visual Basic程序如下，在程序 (1)和 (2)劃線處，填入適當?shù)恼Z句或表達式，把程序補充完整。 Private Sub Command1_Click() Dim i As Integer, t As Long t = 0 i = 1 Do While i = 2187 t = t + i i = i + 3 Loop = Str(t) End Sub 問： （ 1）為了實現(xiàn)這一目標，程序劃 線處的表達式應更正為 __________。 Private Sub Command1_Click() Dim x As String, i As Integer, s As Integer s = 0 x = (1) For i = 1 To n 39。在違章查詢系統(tǒng)中輸入車主的汽車車牌號，查詢系統(tǒng)就會按照車牌號查找所有的違章記錄。 2． 有如下 Visual Basic程序段 ： x = 90 If x 90 Then = 聲音超標 Else = 合格 End If 該程序段運行后 ， 在標簽 Label1上顯示的是 ____________。商品的代號和得票數(shù)分別保存在數(shù)組 a和 b中，第 i個商品的代號保存在 a(i)中，對應的得票數(shù)保存在 b(i)中。 3． 有如下 Visual Basic程序 ： Private Sub Command1_Click() Dim s As Integer, i As Integer s = 1 For i = 1 To 10 s = s + 1 Next i = Str(s) End Sub 問： （ 1）程序運行后，變量 s的值為 ____________。 解決此問題的算法流程圖如圖 VB2所示，相應程序如下，在程序 (1)和 (2)劃線處填入適當?shù)恼Z句和代碼，把程序補充完整。 4． 交通違章查詢。 56789是 （ A）字符串常量 （ B）數(shù)值常量 （ C）邏輯常量 （ D）實數(shù)常量 10． 長 方體側面積計算公式是 s=2h(a+b)， a、 b為長和寬， h為高，計算 s的 Visual Basic表達式是 （ A） 2h(a+b) （ B） 2h*(a+b) （ C） 2*h(a+b) （ D） 2*h*(a+b) 11． 在 Visual Basic中 ， 表示窗體裝載的事件是 （ A） Click （ B） KeyPress （ C） Load （ D） DblClick 12． 下面程序段是利用 For語句給數(shù)組 a賦值 For i= 1 To 5 a(i)=2*i1 Next i 該程序段運 行后數(shù)組元素 a(4)的值為 （ A） 4 （ B） 5 （ C） 7 （ D） 9 13． 在 Visual Basic中，若 x、 y都是正整數(shù)，且 x能被 y整除，則下列表達式值一定為真的是 （ A） x/y=0 （ B） Sqr(x\y)=x\y （ C） Int(x\y)=0 （ D） Int(x/y)=x/y 14． 把星期一記為 1，星期二記為 2，……，星期日記為 0，已知某月 1日（即第 1天）是星期一，下列語句中，用于正確計算該月第 n日星期數(shù) w的是 （ A） w=n Mod 7 （ B） w=(n+1) Mod 7 （ C） w=(n+1)\7 （ D） w=n\7 程序填空題： 一、 1． 有如下 Visual Basic程序段 ： i = 7: j = 3 k = i * j j 該程序段運行后 ， 變量 k的值為 ____________。信息可以同時被眾多接收者獲取是因為信息具有 （ A） 傳遞性、共享性 （ B）傳遞性、真?zhèn)涡? （ C）載體依附性、真?zhèn)涡? （ D）載體依附性、價值相對性 2． 十六進制數(shù) 7BH轉換成二進制數(shù)是 （ A） (1111111)2 （ B） (1111011)2 （ C） (1111101)2 （ D） (1111110)2 3． 用 UltraEdit軟件觀察字符內碼，結果如下圖所示： 若被觀察的字符全部屬于 GB2312編碼漢字，則圖中內碼表示的漢字共有 （ A） 1個 （ B） 2個 （ C） 5個 （ D） 10個 4． 用 OCR軟件識別文字的主要操作步驟有： ①對圖像進行傾斜校正 ②單擊識別按鈕 ③劃分識別區(qū)域 ④打開圖像文件 ⑤校對文字 正確的操作順序是 （ A）①②③④⑤ （ B）⑤①③②④ （ C）①④③⑤② （ D）④①③②⑤ 5． 在 RGB顏色模式下，表示白色的是 （ A） RGB(0,0,0) （ B） RGB(255,255,0) （ C） RGB(255,255,255) （ D） RGB(255,0,255) 6． 下圖是一個用 Access軟件創(chuàng)建的數(shù)據(jù)表，記錄了某班學生的體檢情況： 以下有關該數(shù)據(jù)表的說法正確的是 （ A） 出生年月 字段的類型是 數(shù)值型 （ B）該表共有 5個字段 （ C）該表共有 27條記 錄 （ D）刪除一條記錄后，記錄數(shù)為 50 7． 為問題 輸出 10000以內所有偶數(shù) 設計一個算法，合適的算法流程是 （ A）順序模式 （ B）選擇模式 （ C）循環(huán)模式 （ D）樹型模式三個 8。從算法角度看，小明的做法屬于 （ A）解析算法 （ B）選擇排序 （ C）冒泡排序 （ D） 順序查找 在 Visual Basic中，用數(shù)組 a存儲 50位同學一次數(shù)學考試分數(shù)，合適的數(shù)組定義語句是 （ A） Dim a(1 To 50) As Single （ B） Dim a(1 To 50) As Boolean （ C） Dim a(1 , 20) As Integer （ D） Dim a(1 , 10) As Long 在 Visual Basic中 ， 表達式 Int(sqr(10))的值是 （ A） 5 （ B） 4 （ C） 3 （ D） 10 1在 Visual Basic中 ， 如果要在標簽 Label1上顯示 Pass， 則應改變的屬性是 （ A） BackColor （ B） Height （ C） Width （ D） Caption 1在 Visual Basic中 ， 將表達式 b+2的值賦給變量 a， 正確的賦值語句是 （ A） b+2=a （ B） 2+b=a （ C） a=b+2 （ D） a+b=2 1在 Visual Basic中 ， 如果 a=5， b=2， c=3， 那么下列表達式值為真的是 （ A） (ac) Or (ba) （ B） (ab) Or (bc) （ C） (ac) And (ba) （ D） (ab) And (bc) 1一個酵母細胞每 10分鐘分裂為 2個，在下一個 10分鐘，就有 4個細胞，然后， 8個、 16個、……。他通過網(wǎng)絡獲取了一些捐款賬號，可信度較高的是 （ A）中國紅十字會總會網(wǎng)站發(fā)布的賬號 （ B）在網(wǎng)絡上通過搜索引擎搜索到的賬號 （ C）網(wǎng)友通過 發(fā)布的賬號 （ D）來歷不明的電子郵件中的賬號 2． 十進制數(shù) 23轉換成二進制數(shù)是 （ A） (10011)2 （ B） (10101)2 （ C） (10111)2 （ D） (11011)2 3． 全文檢索是一種從全文中檢索所需信息的檢索技術，其檢索的對象為 （ A）文本 （ B）圖像 （ C）聲音 （ D）視頻 4． 購買車票可到不同的售票點辦理，而各售票點賣出的車票互不重號，通常是因為各售票點售票系統(tǒng)檢索的是相同的 （ A） Word文檔 （ B）數(shù)據(jù)庫 （ C） Excel文檔 （ D）文本文檔 5． 如下圖所示，編輯圖 A得到圖 B，采用的操作是 （ A）縮放 （ B）旋轉 （ C）裁剪 （ D）調節(jié)亮度 /對比度 6． 有流程圖結構如下，其算法結構屬于 N ＞ 10 ？ 輸出 S Y N N ← N+ 1 S ← S + N （ A）順序結構 （ B）選擇結構 （ C）分支結構 （ D）循環(huán)結構 7． 某種氣體在 0℃時的體積為 100L，溫度 t每升高 1℃，其體積 v就增加 。已知氣體的體積 v，計算溫度 t的步驟有： ①計算溫度 t=(v100)/k ② k= ③輸出溫度 t ④輸入氣體體積 v 其正確的順序是 （ A）④②①③ （ B）④①②③ （ C）③①②④ （ D）④①③② 8． 有 23個蘋果分給甲、乙、丙、丁四個孩子，每個孩子最多可得到的蘋果數(shù)依次為 6個，找出所有不同分法的算法是：采用列舉方式，列舉每個孩子所有可能得到的蘋果數(shù)，對四人所得蘋果數(shù)總和是否為 23進行判斷，找出符合要求的各種分法，此算法屬 于 （ A）解析算法 （ B）枚舉算法 （ C）遞歸算法 （ D）排序算法 9． 在 Visual Basic中，用變量 p存儲數(shù)值 ，變量 p的數(shù)據(jù)類型應定義為 （ A） Boolean （ B） Integer （ C） Single （ D） Date 10． 在 Visual Basic中 ， 下列表達式的值等于 3的是 （ A） Int() （ B） Abs() （ C） Sqr() （ D） Len() 11． 在 Visual Basic中 ， 語句 =2020中的 Soft是 （ A） 屬性名 （ B） 屬性值 （ C） 對象名 （ D） 窗