VB程序設(shè)計(jì)試卷A及答案

1、_號(hào)學(xué)_名姓_級(jí)班_部系- VB程序設(shè)計(jì)試卷（ A 卷）-（時(shí)間 90 分鐘 滿分 100 分）-線-題號(hào)一二三四五合計(jì)-分?jǐn)?shù)-閱卷人-一、選擇題：（ 30 分，每題 2 分）-閱卷人得分-1、“x 是小于 100 的非負(fù)數(shù)”，用 VB表達(dá)式表示正確的是（）-A、 0 x<100 B 、0<=x<100C、0<=x or x<100 D 、0<=x and x<100-封-2、下面哪組語(yǔ)句可以將變量A 和 B 的值互換？（）-A、 A=B: B=AB、 A=(A+B)/2: B=(A-B)/2-C、 A=A+B:B=A-B:A=A-BD、 A=C:C

2、=B:B=A-3、在 Select Case X 結(jié)構(gòu)中，描述判斷條件 3X 7的測(cè)試項(xiàng)應(yīng)該寫成-_ 。-A、 Case 3 X 7B、 Case 3 To 7-C 、 case Is3, Is 3D、 Case 3 X ， X 7-密4、下面（）是算術(shù)運(yùn)算符？-A、modB 、 impC、notD、like-5、以下控件中可以入選為容器控件的是() 。-A、Image 圖像框控件B、 ListBox列表框控件-C、TextBox 文本框控件D、Picture圖片框控件-第 1 頁(yè)-6、下列操作不能打開代碼窗口的是( )A、選中對(duì)象 , 單擊鼠標(biāo)右鍵 , 在彈出的快捷菜單中選擇“查看代碼”命令

3、B、選中對(duì)象 , 雙擊鼠標(biāo)左鍵C、按 F7 鍵D、按 F4 鍵7、函數(shù) Mid(" 山羊上山山碰山羊腳 ", 3, 2)的結(jié)果是（）A、山羊B、羊上C、上山D、山山8、窗體運(yùn)行后，要使窗體自動(dòng)顯示在屏幕的中央位置，應(yīng)設(shè)置窗體的（ ）屬性？A、WindowstateB、StartuppositionC、IconD、mousePointer9、下列哪個(gè)語(yǔ)句是錯(cuò)誤的VB語(yǔ)句（）A 、 Text1.Text = " 你好！ " ； Text1.BackColor = RedB 、 Text1.Text = " 你好！ " ： Text1.Ba

4、ckColor = RedC 、Text1.Text = "你好！ "D 、 Option Explicit10、以下描述中錯(cuò)誤的是 ()A、符號(hào)常量的使用和變量的使用沒有差別B、 常量可分為字符型常量，數(shù)值常量，時(shí)間/ 日期型常量，布爾型常量C、 符號(hào)常量是用一個(gè)標(biāo)識(shí)符來(lái)代表一個(gè)常量D、 常量在程序執(zhí)行期間其值不會(huì)發(fā)生變化11、若想要建立一個(gè)學(xué)生管理的輸入界面，其中要求選擇學(xué)生的性別/ 政治面貌（黨 / 團(tuán)/ 群眾）及選課情況（共有5 門課，可任選），應(yīng)如何在窗體中利用單選鈕和選擇框來(lái)實(shí)現(xiàn)（）。A將 5 門課程用一組 5 個(gè)選擇框來(lái)表示，將性別和政治面貌用5 個(gè)單選鈕來(lái)表

5、示B將 5 門課程用一組 5 個(gè)選擇框來(lái)表示，用兩個(gè)框架分別將性別用2 個(gè)單選鈕，政治面貌用 3 個(gè)單選鈕來(lái)表示C將 5 門課程用一組 5 個(gè)單選鈕來(lái)表示，將性別和政治面貌用5 個(gè)選擇框來(lái)表示D用一組 10 個(gè)選擇框來(lái)表示課程、性別和政治面貌12、下面程序段中求兩數(shù)中的大數(shù)，（）不正確A、max=iif(x>y,x,y)B、if x>y then max=x else max=y（共 4頁(yè)）_號(hào)學(xué)_名姓_級(jí)班_部系-C、 max=xD、if y>=x then max=y-if y>x then max=ymax=x-13、執(zhí)行 inputbox后顯示效果如圖 2-3

6、所示，將輸入結(jié)果保存在變量x 中，-inputbox正確的寫法為：（）-線-圖 2-3-A、 x = InputBox("調(diào)查", "您年齡幾何？ ", 30)-B、 x = InputBox("您年齡幾何？ ", " 調(diào)查 ", 30)-C、 x = InputBox "調(diào)查 ","您年齡幾何？ ", 30-D、 x = InputBox "您年齡幾何？ ", " 調(diào)查 ", 30-封-14、在當(dāng)前應(yīng)用程序的目錄下有一圖片文件p1.j

7、pg ，程序運(yùn)行后，要在圖片框-picture1中顯示圖片 p1.jpg，可使用的語(yǔ)句是：（）-A、picture1.picture=app.path &”p1.jpg ”-B、picture1.picture=loadpicture(app.path &“p1.jpg”)-C、picture1.picture=app.path &“p1.jpg”)-、“”-picture1.picture=loadpicture(app.path &p1.jpg)-D-15要將列表框 list1的第 3項(xiàng)內(nèi)容顯示在文本框 text1中，可使用的語(yǔ)句是：-（ ）密-A、text

8、1.text=list1.listcountB、 text1.text=list1.listC-C、text1.text=list1.listindexD、 text1.text=list1.listB-二、填空題：（ 10 分，每題 2 分）-閱卷人得分-16、VB中的過(guò)程包括有事件過(guò)程和過(guò)程。-第 2 頁(yè)-17、VB中代碼存儲(chǔ)在 3 種不同的模塊中：窗體模塊、和類模塊。18、使用公用對(duì)話框的屬性，設(shè)置顯示文件的類型。19、菜單項(xiàng)可以響應(yīng)的事件過(guò)程為。20、通過(guò)連接對(duì)象的方法，可對(duì)連接執(zhí)行各種操作。三、判斷題（ 30 分，每題 1.5 分，對(duì)打“”，錯(cuò)打“×”）閱卷人得分21、窗體

9、文件的擴(kuò)展名為BAS。 （）22、當(dāng)完成完成的全部文件后，通過(guò)編譯工程可以將此工程轉(zhuǎn)換成可執(zhí)行文件exe。（）23、在窗體上復(fù)制控件， 如果復(fù)制的控件名稱相同， 系統(tǒng)會(huì)出現(xiàn)一個(gè)是否創(chuàng)建控件數(shù)組 的對(duì)話框。（）24、在 VB中，對(duì)于沒有聲明的變量，其默認(rèn)的數(shù)據(jù)類型是variant 。（）25、對(duì)象變量賦值，必須使用關(guān)鍵字set。（）26、如果今天是星期五，那么 print weekday(now()輸出的結(jié)果是 4。（）27、使用 print 方法可以將信息直接輸出到窗體或者picturebox中。（）28、在設(shè)計(jì)程序時(shí)改變文本框的 multiline屬性和 scrollbars屬性，可使文本框

10、顯示多行并且出現(xiàn)滾動(dòng)條？（）29、文本框的 selstart屬性，設(shè)置所選擇文本框的起始點(diǎn)， sellength屬性設(shè)置或者返回所選擇的字符數(shù)？這二個(gè)屬性只能程序代碼完成。（）30、設(shè)置時(shí)鐘控件的 Enabled 屬性，指定了兩個(gè) timer事件之間的毫秒數(shù)。（）31、Do loop 循環(huán)中使用 exit do不能跳出循環(huán)。（）32、如果沒有使用 option base 1語(yǔ)句，則缺省的數(shù)組下限為 0。（）33、調(diào)用對(duì)象方法的格式為：對(duì)象名. 方法名。（）34、一個(gè)控件的事件過(guò)程將控件的實(shí)際名、下畫線和事件名組合起來(lái)。（）35、改變當(dāng)前的驅(qū)動(dòng)器為e: ，使用的語(yǔ)句是： chdrive“ e”。

11、（）36、VB菜單設(shè)計(jì)器中“復(fù)選”，其作用是：設(shè)置下拉菜單項(xiàng)的 checked 屬性。（）（共 4頁(yè)）_號(hào)學(xué)_名姓_級(jí)班_部系-37、用戶可以通過(guò)設(shè)置菜單項(xiàng)的 visible 屬性值為 false 來(lái)使該菜單項(xiàng)不可見。-（）-38、數(shù)據(jù)表是由多列多行構(gòu)成的集合、每列稱為一個(gè)字段，每行稱為一條記錄。-（）-39、保存對(duì)當(dāng)前記錄的修改，可以通過(guò)記錄集的update 方法完成。（）-線-40、指示當(dāng)前記錄指針位置是否位于首記錄前，使用記錄集的EOF屬性；指示是-否位于末記錄尾，使用記錄集的 BOF屬性。（）-四、程序閱讀：（ 12 分，每題 6 分）-閱卷人得分-41、本程序有一個(gè)標(biāo)準(zhǔn)模塊和一個(gè)窗體

12、模塊。 Sub main 過(guò)程是本程序的啟動(dòng)過(guò)程，-其他過(guò)程是窗體模塊的事件過(guò)程，執(zhí)行本程序，依次單擊命令按command1和-command2，在窗體上輸出的 3 行內(nèi)容分別是、。封-標(biāo)準(zhǔn)模塊-public x as integer-sub main()-x=5-form1.show-form1.print x-end sub-密-dim y as integer-窗體模塊-private sub command1_click()-y=x*2-print y-end sub-Private Sub Command2_Click()-第 3頁(yè)-y = x / 2Print yEnd Sub42

13、、下邊的程序的功能是計(jì)算f=1-1/(2*3)+1/(3*4)-1/(4*5)+ 、+1/(19*20),請(qǐng)完成填空private sub form_click()dim f as single,I as integer,sign as integerf=1f=f+sign/(I*(I+1)next Iprint“ f= ”;fend sub五、編寫程序：（ 18 分，每題 9 分）閱卷人得分43、（ 9 分）編寫程序，在文本框 text1 中輸入一個(gè)整數(shù)并按回車鍵后，判斷輸入的整數(shù)是奇數(shù)和偶數(shù)，在標(biāo)簽 label1 中顯示“奇數(shù)”或者“偶數(shù)”，是奇數(shù)以紅字顯示，偶數(shù)時(shí)以藍(lán)字顯示。44、（ 9

14、 分）在單擊窗體上“打印五角星”命令按鈕，在窗體上打印圖3。圖 3（共 4頁(yè)）_號(hào)學(xué)_名姓_級(jí)班_部系- VB程序設(shè)計(jì)試卷（ A 卷）答案-（時(shí)間 90 分鐘 滿分 100 分）-線-題號(hào)一二三四五-分?jǐn)?shù)-閱卷人-一、選擇題：（ 30 分，每題 2 分）-閱卷人得分-1234-DCBA-6789封-DCBA-11121314-BDBD-二、填空題：（ 10 分，每題 2 分）-閱卷人得分-16、通用17、標(biāo)準(zhǔn)模塊18 、 filter-密-19、 click20、 execute-三、判斷題（ 30 分，每題 1.5 分）-閱卷人得分-21222324-×-26272829-合計(jì)5D10A15D2530第 4 頁(yè)×3132333435×3637383940×四、程序閱讀：（12 分，每題 6 分）閱卷人得分41、510242、sign=-1for I=2 to 19sign=-sign五、編寫程序：（ 18 分，每題 9 分）閱卷人得分43、If KeyAscii = 13 ThenDim x As Integerx = Val(Text1.Text)If x Mod 2 = 0 ThenLabel1.Caption