VB 例題解析和練習(xí)題

3第1章VisualBasic集成開(kāi)發(fā)環(huán)境一.例題解析單項(xiàng)選擇題使用VB6.0集成開(kāi)發(fā)環(huán)境開(kāi)發(fā)的應(yīng)用程序不適宜的運(yùn)行環(huán)境是 。Windows3.2 B)Windows9xC)WindowsNT D)Windows2000【答案】AVB6.0集成開(kāi)發(fā)工具，是32WindowsNT或Vindows2000環(huán)境中運(yùn)行。而DOSWindows3.X16位的操作系統(tǒng)。VB6.0共有三個(gè)版本，按功能從弱到強(qiáng)的順序排列應(yīng)是 。學(xué)習(xí)版、專(zhuān)業(yè)版和工程版 B)學(xué)習(xí)版、工程版和專(zhuān)業(yè)版C)學(xué)習(xí)版、專(zhuān)業(yè)版和企業(yè)版 D)學(xué)習(xí)版、企業(yè)版和專(zhuān)業(yè)【答案】CVB6.0業(yè)版。VB6.0集成開(kāi)發(fā)環(huán)境有三種工作狀態(tài)，不屬于三種工作狀態(tài)之一的是 。設(shè)計(jì)狀態(tài) B)編寫(xiě)代碼狀態(tài)C)運(yùn)行狀態(tài) D)中斷狀態(tài)【答案】BVB也稱(chēng)三種模式或三種階段。不能打開(kāi)代碼窗口的操作是 。A)雙擊窗體設(shè)計(jì)器的任何地方B)按下F4鍵單擊工程窗口中的【查看代碼】按鈕選擇“視圖”菜單中的“代碼窗口”命令【答案】B【解析】按下F4鍵將打開(kāi)屬性窗口，其余的操作都能夠打開(kāi)代碼窗口。工程文件的擴(kuò)展名是 。.frm B).vbp C).bas D).frx【答案】B【解析】VB的應(yīng)用程序稱(chēng)為工程，一個(gè)工程由若干文件組成，其中工程文件的擴(kuò)展名是.vbp。窗體文件的擴(kuò)展名是 。.frm B).vbp C).bas D).frx【答案】A【解析】在VB的應(yīng)用程序中，每個(gè)窗體對(duì)應(yīng)一個(gè)文件，窗體文件的擴(kuò)展名是.frm。在設(shè)計(jì)階段，當(dāng)雙擊窗體上的某個(gè)控件時(shí)，所打開(kāi)的窗口是 。工程資源管理器窗口 B)工具箱窗C)代碼窗口 D)屬性窗口【答案】C所在的代碼窗口。填空題VB6.0窗體文件默認(rèn)主名是 ?！敬鸢浮縁ormx【解析】其中x1，2，3VB6.0窗體的名稱(chēng)屬性和標(biāo)題屬性的默認(rèn)值為可以改變保存窗體文件的主名。啟動(dòng)VB6.0后，要建立一個(gè)新工程，開(kāi)始的操作是 。【答案】在“新建工程”對(duì)話(huà)框中選擇“標(biāo)準(zhǔn)EXE”選項(xiàng)，單擊“打開(kāi)”按鈕?！窘馕觥縑B6.0把一個(gè)項(xiàng)目稱(chēng)為一個(gè)工程。VB6.0生成可執(zhí)行程序的擴(kuò)展名是 ?！敬鸢浮?exe【解析】VB6.0是解釋型語(yǔ)言。在輸入代碼的同時(shí)，解釋系統(tǒng)將高級(jí)語(yǔ)言翻譯成機(jī)器指令，并可判斷語(yǔ)法是否正確。在設(shè)計(jì)程序時(shí)，還可以運(yùn)行程序。設(shè)計(jì)、調(diào)試成功的程序可以編譯生成可執(zhí)行文件(.exe)，這樣的文件可脫離VB6.0在Windows環(huán)境下運(yùn)行。在VB6.0集成開(kāi)發(fā)環(huán)境中的工作狀態(tài)顯示在 的方括號(hào)內(nèi)?！敬鸢浮繕?biāo)題欄【解析】VB的工作狀態(tài)有：設(shè)計(jì)狀態(tài)、運(yùn)行狀態(tài)和中斷狀態(tài)。設(shè)計(jì)狀態(tài)：用于設(shè)計(jì)應(yīng)用程序的用戶(hù)界面和編寫(xiě)程序代碼。運(yùn)行狀態(tài)：運(yùn)行應(yīng)用程序。此時(shí)，不能修改用戶(hù)界面和編輯程序代碼。中斷狀態(tài)：運(yùn)行的應(yīng)用程序被暫時(shí)中斷，按F5或單擊工具欄的“繼續(xù)”按鈕可繼續(xù)運(yùn)行程序，單擊“結(jié)束”按鈕停止程序的運(yùn)行。此時(shí)，可以編輯程序代碼，但不能修改用戶(hù)界面。此狀態(tài)會(huì)彈出“立即”窗口，在“立即”窗口內(nèi)可以輸入命令，并立即執(zhí)行。二.練習(xí)題單項(xiàng)選擇題VisualBasic6.0是一種面向 的程序設(shè)計(jì)語(yǔ)言。A)機(jī)器 B)對(duì)象 C)結(jié)構(gòu) D)過(guò)程下列程序設(shè)計(jì)語(yǔ)言中支持面向?qū)ο蟮某绦蛟O(shè)計(jì)語(yǔ)言是 。C B)Pascal C)VisualBasic D)Cobol下列敘述中，錯(cuò)誤的是 。B)啟動(dòng)VisualBasic后，工具箱中只有標(biāo)準(zhǔn)控件C)在VisualBasic集成開(kāi)發(fā)環(huán)境中，工具箱窗口只能位于窗體的左側(cè)D)用戶(hù)可以清除立即窗口中的內(nèi)容啟動(dòng)VisualBasic6.0中文版后，標(biāo)題欄中顯示的信息是 。MicrosoftVisual設(shè)計(jì)]1-MicrosoftVisualBasic設(shè)計(jì)]1-Visual設(shè)計(jì)]1-MicrosoftVisualBasic設(shè)計(jì)]VisualBasic6.0窗體設(shè)計(jì)器的主要功能是 。工程界面設(shè)計(jì) B)過(guò)程代碼設(shè)計(jì)C)圖形圖像設(shè)計(jì) D)添加控件下列敘述中，錯(cuò)誤的是 。啟動(dòng)VisualBasic后，工具箱中只有標(biāo)準(zhǔn)控件工具箱中的控件是固定的，無(wú)法添加新的控件。在VisualBasicD)工具箱中控件的是類(lèi)而不是對(duì)象。工程資源管理器窗口可以列出 種文件A)2 B)3 C)4 D)5下列敘述中，錯(cuò)誤的是 。啟動(dòng)VisualBasic后，屏幕只有一個(gè)窗體Form1C)標(biāo)準(zhǔn)模塊由程序組成D)用使標(biāo)準(zhǔn)工具欄上的 按鈕可以打開(kāi)工具箱窗口下列敘述中，正確的是 。一個(gè)工程只有一個(gè)窗體Form1。255個(gè)窗體。窗體模塊由程序組成用使工程資源管理器窗口的 按鈕可以查看窗體對(duì)象下列關(guān)于屬性窗口的敘述中，正確的是 。一個(gè)工程可以打開(kāi)任意個(gè)屬性窗口。用使標(biāo)準(zhǔn)工具欄的 按鈕可以打開(kāi)屬性窗口屬性窗口的屬性列表只能按字母順序排列在工程設(shè)計(jì)中，只能在屬性窗口設(shè)置屬性以下不是VisualBasic特點(diǎn)的是 ?？梢暬幊?B)面向?qū)ο?C)事件驅(qū)動(dòng) D)算法生成以下敘述中錯(cuò)誤的是 。打開(kāi)一個(gè)工程文件時(shí)，系統(tǒng)自動(dòng)裝入與該工程有關(guān)的窗體、標(biāo)準(zhǔn)模塊等文件保存VisualBasic程序時(shí)，應(yīng)分別保存窗體文件及工程文件VisualBasic應(yīng)用程序只能以解釋方式執(zhí)行事件可以由用戶(hù)引發(fā)，也可以由系統(tǒng)引發(fā)以下敘述中錯(cuò)誤的是 。B).bas為擴(kuò)展名的文件是標(biāo)準(zhǔn)模塊文件C)窗體文件包含該窗體及其控件的屬性D)最常用于變量跟蹤的窗口是 。監(jiān)視窗口 B)代碼窗口 C)立即窗口 D)工程資源管理器窗口啟動(dòng)VisualBasic后，在工具箱中列出的控件是 。A)ActiveX控件 B)標(biāo)準(zhǔn)控件 C)ODBC控件 D)可插入對(duì)象以下關(guān)于保存工程的敘述中，正確的是 。A)保存工程時(shí)只保存窗體文件即可B)保存工程時(shí)只保存工程文件即可C)保存工程時(shí)，先保存工程文件后保存窗體文件D)保存工程時(shí)，先保存窗體文件后保存工程文件以下操作不能啟動(dòng)VisualBasic6.0的是 。A)雙擊VisualBasic6.0的快捷方式圖標(biāo)B)通過(guò)“開(kāi)始”菜單中的“運(yùn)行”命令C)通過(guò)“開(kāi)始”菜單中的“程序”命令D)在DOS的實(shí)模式下，進(jìn)入VisualBasic的安裝目錄，運(yùn)行vb6.exe以下操作不能打開(kāi)VisualBasic6.0屬性窗口的是 。F4鍵C)單擊標(biāo)準(zhǔn)工具欄中的【屬性窗口】按鈕D)按Ctrl+T在VB集成開(kāi)發(fā)環(huán)境中，功能鍵F8的功能是 。A）運(yùn)行程序 B）進(jìn)入編輯狀態(tài)C）新建工程 D）逐語(yǔ)句調(diào)試填空題VisualBasic6.0是基于Microsoft的 位操作系統(tǒng)設(shè)計(jì)的。VisualBasic程序設(shè)計(jì)的核心是設(shè)計(jì) 。VB的一個(gè)應(yīng)用程序是由窗體模塊、 模塊和 模塊等組成的。編寫(xiě)可視化程序的基本步驟依次是工程界面設(shè)計(jì)設(shè)置對(duì)象的屬性、 調(diào)試運(yùn)行工程和保存工程。VisualBasic6.0的編程機(jī)制是 。VisualBasic6.0的程序設(shè)計(jì)方法是 。

的作用是 。的作用是 。的作用是 。圖標(biāo) 或“視圖”菜單的 命令可以打開(kāi)屬性窗口。保存一個(gè)新建工程時(shí)，一般先保存 文件，然后保存 文件。使用“文件”菜單的 命令，能夠生成工程1的exe文件。VisualBasic6.0集成開(kāi)發(fā)使用的操作系統(tǒng)是 。在工程資源管理器窗口頂部有3個(gè)按鈕，分別為 【查看對(duì)象】和【切文件夾?！敬鸢浮繂雾?xiàng)選擇題（1）B（2）C（3）C（4）D（5）A（6）B（7）D（8）B（9）B（10）B（11）（12）（13）（14）（15）（16）（17）（18）（19）DCACBDDDD填空題（1）32對(duì)象標(biāo)準(zhǔn)，類(lèi)編寫(xiě)程序代碼事件驅(qū)動(dòng)面向?qū)ο蟠蜷_(kāi)工程資源管理器窗口運(yùn)行工程保存工程屬性窗口frm（或窗體）vbp（或工程）1.exeWindows查看代碼第2章面向?qū)ο蟮某绦蛟O(shè)計(jì)一．例題解析面向?qū)ο蟮某绦蛟O(shè)計(jì)指滿(mǎn)足 。B)封裝性、繼承性、多態(tài)性C)對(duì)象的鏈接、動(dòng)態(tài)鏈接、動(dòng)態(tài)數(shù)據(jù)交換D)ODBC，DDE，OLE【答案】B【解析】具有封裝性、繼承性、多態(tài)性的程序設(shè)計(jì)稱(chēng)為面向?qū)ο蟮某绦蛟O(shè)計(jì)。用戶(hù)在屏幕上畫(huà)出應(yīng)用程序界面，并設(shè)置好對(duì)象的屬性，系統(tǒng)便可以自動(dòng)生成序代碼，這種設(shè)計(jì)方式稱(chēng)為 。B)結(jié)構(gòu)化程序設(shè)計(jì)C)事件驅(qū)動(dòng)的編程機(jī)制D)可視化程序設(shè)計(jì)【答案】DVB6.0VBActiveX控件的文件擴(kuò)展名是。.cls B).ocxC).frm D).bas【答案】B.frm和.basB。以下敘述中錯(cuò)誤的是 。B)以.bas為擴(kuò)展名的文件是標(biāo)準(zhǔn)模塊文件C)窗體文件包含該窗體及其控件的屬性D)【答案】A序具有多個(gè)工程時(shí)，工程資源管理器窗口中將包含多個(gè)工程文件。以下不屬于VisualBasic系統(tǒng)的文件類(lèi)型是 。.frm B).bat C).vbg D).vbp【答案】B.frmVisualBasic.bat是批處理文件的擴(kuò)展名。以下不能在工程資源管理器窗口中列出的文件類(lèi)型是 。A).bas B).res C).frm D).ocx【答案】D【解析】VB的工程資源管理器窗口中通常列有以下幾類(lèi)文件：工程文件(.vbp)組文件(.vbg)(.frm)(.bas)(.cls)(.res)ActiveX控件文件的擴(kuò)展名，它不能在工程資源管理器窗口中列出。以下敘述中錯(cuò)誤的是。VisualBasic是事件驅(qū)動(dòng)型可視化編程工具VisualBasic應(yīng)用程序不具有明顯的開(kāi)始和結(jié)束語(yǔ)句VisualBasic和高度(Height)屬性VisualBasic中控件的某些屬性只能在運(yùn)行時(shí)設(shè)置【答案】C【解析】VisualBasic工具箱中的大部分控件都具有寬度(Width)和高度(Height)屬性，但有些控件沒(méi)有這兩個(gè)屬性，例如計(jì)時(shí)器(Timer)控件和直線(xiàn)(Line)。二．練習(xí)題單項(xiàng)選擇題對(duì)象的含義是 。代碼的集合 B)數(shù)據(jù)的集合C)代碼和數(shù)據(jù)的集合 D)數(shù)據(jù)或代碼的集合對(duì)象的組成的三個(gè)要素是 。函數(shù)、過(guò)程、語(yǔ)句 B)窗體、控件、行C)屬性、方法、事件 D)窗體、模塊、控以下關(guān)于對(duì)象屬性敘述中錯(cuò)誤的是 。對(duì)象有自己特殊的屬性所有的對(duì)象都有相同的屬性C)D)屬性值的設(shè)置可以在屬性窗口中進(jìn)行下述選項(xiàng)中，屬于VB的程序設(shè)計(jì)方法是 。面向?qū)ο蟆㈨樞蝌?qū)動(dòng) B)面向?qū)ο?、事件?qū)動(dòng)C)面向過(guò)程、事件驅(qū)動(dòng) D)面向過(guò)程、順序驅(qū)動(dòng)事件的名稱(chēng)必須是 。窗體所能夠識(shí)別的 B)能夠被用戶(hù)觸發(fā)的對(duì)象所具有的 D)該事件有對(duì)應(yīng)的方法可執(zhí)行VisualBasic中的Move、Print是對(duì)象的 。事件 B)方法 C)屬性 D)名稱(chēng)VisualBasic中的Click、Load是對(duì)象的 。事件 B)方法 C)屬性 D)名稱(chēng)VisualBasic中的Left、Top是對(duì)象的 。事件 B)方法 C)屬性 D)名稱(chēng)下列有關(guān)屬性設(shè)置的語(yǔ)句中，錯(cuò)誤的是 A)Labell.Caption="畫(huà)"B)Textl.Text=Forml.CaptionC)Commandl.Name="VisualBasic"Forml.Caption=Labell.Caption下面四個(gè)選項(xiàng)，不是事件的。A)Click B)Visible C)Unload D)Change下列選項(xiàng)中，屬于VisualBasic事件的是 。Cls B)Click C)Caption D)Top在屬性窗口設(shè)置對(duì)象的屬性時(shí)，通常采用的方式有 。A)直接鍵入屬性值 B)選擇輸入C)利用對(duì)話(huà)框 D)以上三種方式都是下列關(guān)于控件屬性的敘述中，正確的是A)控件屬性只能在設(shè)計(jì)時(shí)設(shè)置，不能在運(yùn)行時(shí)設(shè)置B)所有控件的相同屬性都有相同的默認(rèn)值所有對(duì)象都具有相同的屬性控件的屬性值可以在屬性窗口修改填空題（1）用來(lái)描述對(duì)象的特征的一組數(shù)據(jù)稱(chēng)為對(duì)象的 。（2）對(duì)象的屬性值可以在應(yīng)用程序的執(zhí)行中由VB代碼設(shè)定。設(shè)定的格式是 。在VB中對(duì)象的 是指對(duì)象要完成的某個(gè)任務(wù)或動(dòng)作。在VB中 是預(yù)先定義好的能夠被對(duì)象所識(shí)別的動(dòng)作。名稱(chēng)是每個(gè)對(duì)象最基本的屬性。單窗體的默認(rèn)名為 。決定對(duì)象左上角在載體上的位置的屬性是 和 。要使一個(gè)控件失效，應(yīng)該將該控件的 屬性設(shè)置為False。設(shè)置控件上所顯示文字的字體和格式的屬性是 ?！敬鸢浮繂雾?xiàng)選擇題（（1）CB（2）C（12）D（3） （4） （5） （6） （7） （8） （9） （10）B（13）DBCBACCB填空題屬性.屬性=屬性值方法事件Form1注：兩個(gè)答案可以交換）EnabledFont（9）（10）第3章窗體和菜單設(shè)計(jì)一．例題解析在VB中，要將一個(gè)窗體裝載到內(nèi)存進(jìn)行變量初始化等預(yù)處理，應(yīng)使用是 。Show方法 B)UnLoad語(yǔ)句 C)Load語(yǔ)句 D)Hide方法【答案】C【解析】要將一個(gè)窗體裝載到內(nèi)存應(yīng)使用LoadShow法是隱藏窗體，Unload語(yǔ)句是卸載窗體。如果要改變窗體的標(biāo)題，則需要設(shè)置的屬性是 。A)Caption B)Name C)BackColor D)BorderStyle【答案】A【解析】窗體的標(biāo)題由窗體的Caption屬性設(shè)置。Name屬性是窗體的名稱(chēng)，BackColor屬性是窗體分背景色，BorderStyle屬性是窗體邊框的樣式。以下關(guān)于窗體的描述中，錯(cuò)誤的是 。UnloadForm1Form1消失，但仍在內(nèi)存中Load事件在加載窗體時(shí)發(fā)生EnabledFalse時(shí)，通過(guò)鼠標(biāo)和鍵盤(pán)對(duì)窗體的操作都被禁止Height、Width屬性用于設(shè)置窗體的高和寬【答案】A【解析】Unload語(yǔ)句的功能是將窗體從內(nèi)存中卸載，因而窗體不但從屏幕上消失，同時(shí)也從內(nèi)存中卸載掉。以下敘述中正確的是 。Name屬性指定窗體的名稱(chēng)，用來(lái)標(biāo)識(shí)一個(gè)窗體NameC)Name屬性的值D)對(duì)象的Name屬性值可以為空【答案】A【解析】窗體的Name屬性指定窗體的名稱(chēng)，用來(lái)惟一的標(biāo)識(shí)一個(gè)窗體，不能為空。窗體的Name屬性只能在設(shè)計(jì)階段修改，不能在運(yùn)行期間修改。設(shè)在菜單編輯器中定義了一個(gè)菜單項(xiàng)，名稱(chēng)為menu1。為了在運(yùn)行時(shí)使該菜單不可見(jiàn)，應(yīng)使用的語(yǔ)句是 。menu1.Enabled=True B)menu1.Enabled=FalseC)menu1.Visible=True D)menu1.Visible=False【答案】D【解析】Visible屬性用于表示菜單項(xiàng)是否可見(jiàn)，Enabled屬性用于表示菜單項(xiàng)是否可用。要隱藏菜單項(xiàng)menu1，將其Visible屬性設(shè)置為False即可。所以，答案是D。二．練習(xí)題單項(xiàng)選擇題如果要改變窗體的標(biāo)題，則需要設(shè)置的屬性是 。A)Caption B)Name C)BackColor D)BorderStyle若要將窗體從內(nèi)存中卸載，其實(shí)現(xiàn)的方法。使用Show方法 B)使用Load語(yǔ)句C)使用UnLoad語(yǔ)句 D)使用Hide方法設(shè)有一個(gè)菜單項(xiàng)，名稱(chēng)為MenuIte，為了在運(yùn)行時(shí)使該菜單失效（變灰，應(yīng)用的正確語(yǔ)句是 。MenuItem.Enabled=False C)MenuItem.Visible=True D)MenuItem.Visible=FalseC:\pic。為了將該圖形裝入窗體Form1，應(yīng)使用的正確語(yǔ)句是 。Form1.Picture="Welcome.gif"Form1.Picture=C:\Pic\Welcome.gifForm1.Picture="C:\Pic\Welcome.gif"Form1.Picture=LoadPicture("C:\Pic\Welcome.gif")窗體的標(biāo)題內(nèi)容是由下列屬性中的 屬性決定的。Name B)Caption C)FontName D)Text如果將窗體的ControlBox屬性值設(shè)置為False，則 。B)ControlBox屬性仍然起作用窗體邊框上的最大化和最小化按鈕消失動(dòng)、關(guān)閉等操作工程中創(chuàng)建新窗體的方法是 。利用標(biāo)準(zhǔn)工具箱中的窗體控件創(chuàng)建利用“工程”菜單的“添加窗體“項(xiàng)由系統(tǒng)自動(dòng)產(chǎn)生利用“工具”下拉菜單中的命令創(chuàng)建下列關(guān)于窗體的說(shuō)法中，不正確的是一個(gè)工程只能有一個(gè)窗體C)VisualBasic的一個(gè)對(duì)象D)只有在窗體上的控件才是對(duì)象要讓窗體不具有最大化功能，應(yīng)該將窗體的 屬性設(shè)置為FalseA)Max B)MaxButton C)AutoRedraw D)BorderStyle在屬性窗口設(shè)置窗體的下列屬性時(shí)不需要通過(guò)對(duì)話(huà)框設(shè)置的屬性是 。A)Font B)Picture C)Icon D)ControlBox下列屬性中不屬于窗體的是 。A)Enabled B)Left C)Value D)Visible在窗體上建立第一個(gè)文本框，則該文本框的默認(rèn)名稱(chēng)是 。A)Label0 B)Label1 C)Text0 D)Text1清除窗體或圖形框中由繪圖方法或Print方法在運(yùn)行時(shí)生成的圖形或文字用 。Cls B)Hide C)Show D)Move在設(shè)計(jì)多窗體程序時(shí)，按照系統(tǒng)默認(rèn)的名稱(chēng)分別建立4個(gè)窗體Forml、Form2Form3和Form4，則程序運(yùn)行后，最先出現(xiàn)的窗體是 。A)Forml B)Form2 C)Form3 D)Form4設(shè)在菜單編輯器中定義了一個(gè)菜單項(xiàng)名為menu1為了在運(yùn)行時(shí)隱藏該菜單項(xiàng)應(yīng)使用的語(yǔ)句是 。menu1.Enabled=True C)menu1.Visible=True D)menu1.Visible=False以下關(guān)于菜單的敘述中，錯(cuò)誤的是 。在程序運(yùn)行過(guò)程中可以增加或減少菜單項(xiàng)如果把一個(gè)菜單項(xiàng)的Enabled屬性設(shè)置為FalseC)彈出式菜單在菜單編輯器中設(shè)計(jì)D)利用控件數(shù)組可以實(shí)現(xiàn)菜單項(xiàng)的增加或減少下列關(guān)于多窗體工程的存取說(shuō)法錯(cuò)誤的是 。A)以.frm為擴(kuò)展名保存窗體文件，以.vbp擴(kuò)展名保存工程文件B)每個(gè)窗體保存為一個(gè)擴(kuò)展名為.frm的文件.frm為擴(kuò)展名的文件用“打開(kāi)工程”對(duì)話(huà)框打開(kāi)一個(gè)工程時(shí)將把屬于該工程的所有文件裝入內(nèi)存如果一個(gè)工程含有多個(gè)窗體及標(biāo)準(zhǔn)模塊，則以下敘述中錯(cuò)誤的是 。A)如果工程中含有SubMain過(guò)程，則程序一定首先執(zhí)行該過(guò)程B)不能把標(biāo)準(zhǔn)模塊設(shè)置為啟動(dòng)模塊C)用Hide方法只是隱藏一個(gè)窗體，不能從內(nèi)存中清除該窗體D)任何時(shí)刻最多只有一個(gè)窗體是活動(dòng)窗體以下敘述中錯(cuò)誤的是 。一個(gè)工程中可以包含多個(gè)窗體文件在一個(gè)窗體文件中用Private定義的通用過(guò)程能被其他窗體調(diào)用在設(shè)計(jì)VB磁盤(pán)文件全局變量可以在標(biāo)準(zhǔn)模塊中定義也可以在其他模塊中定義下列說(shuō)法正確的是 。一個(gè)應(yīng)用程序只包含一個(gè)窗體一個(gè)應(yīng)用程序可以有多個(gè)啟動(dòng)窗體B)一個(gè)大型應(yīng)用程序通常由多個(gè)主窗體和子窗體組成D)一個(gè)窗體對(duì)應(yīng)一個(gè)窗體文件填空題窗體 決定了窗體的外觀。窗體的 屬性用于設(shè)定窗體的標(biāo)題。程序運(yùn)行后，用鼠標(biāo)單擊對(duì)象時(shí)觸發(fā)的事件是 事件。使用對(duì)象的 方法可以移動(dòng)對(duì)象，并在移動(dòng)的同時(shí)變更對(duì)象的大小。MID應(yīng)用程序一般由一個(gè) 和多個(gè)子窗體構(gòu)成。在Windows環(huán)境下，菜單分為兩種形式：即 。在應(yīng)用程序的的窗體設(shè)計(jì)窗口中，執(zhí)行“工具”菜單下“菜單編輯器”命令則打開(kāi) 窗口。菜單編輯器窗口中的標(biāo)題欄內(nèi)用于輸入本菜單項(xiàng)的 。在菜單編輯器中建立了一個(gè)菜單項(xiàng)，名稱(chēng)為pmenu彈出式菜單彈出，請(qǐng)?zhí)羁铡orm1.【答案】1．單項(xiàng)選擇題pmenu（1） （2）（3）（4）（5）（6）（7）（8）（9）（10）A CADBCBABD（12）（13）（14）（15）（16）（17）（18）（19）（20）C DAADBCABD2．填空題屬性CaptionClickMove父窗體下拉菜單和快捷菜單菜單編輯器標(biāo)題PopupMenu第4章常用標(biāo)準(zhǔn)控件一．例題解析以下能夠觸發(fā)文本框Change事件的操作是 。A)文本框失去焦點(diǎn) B)文本框獲得焦點(diǎn)C)設(shè)置文本框的焦點(diǎn) D)改變文本框的內(nèi)【答案】D【解析】文本框的Text屬性?xún)?nèi)容每發(fā)生一次改變，將觸發(fā)一次Change事件；所以本題的正確答案是選項(xiàng)A。另外，文本框失去焦點(diǎn)將觸發(fā)LostFocus事件，文本框獲得焦點(diǎn)將觸發(fā)GotFocus事件。設(shè)窗體上有一個(gè)列表框控件List1選中的列表項(xiàng)內(nèi)容的是。List1.List B)List1.ListIndexC)List1.Index D)List1.Text【答案】D【解析】列表框的Text屬性的值是最后一次選中的列表項(xiàng)的文本；ListIndex屬性的值Index值；ListIndexD。為了清除列表框中的所有內(nèi)容，應(yīng)使用的方法是。Cls B)Clear C)Remove D)RemoveItem【答案】B【解析】Cls和Remove不是列表框的方法；Clear方法用來(lái)刪除列表框中的所有項(xiàng)目；RemoveItem方法從列表框刪除指定項(xiàng)目。在窗體上放置兩個(gè)滾動(dòng)條和六個(gè)標(biāo)簽，滾動(dòng)條的名稱(chēng)分別為Hscroll1和Hscroll2，標(biāo)簽的名稱(chēng)分別為L(zhǎng)abel～Label其中標(biāo)簽Label～Label6分別顯ABA*B”等文字信息，標(biāo)簽Label1、Label2分別顯示其右側(cè)滾動(dòng)條的當(dāng)前值，Label3顯示A*B的計(jì)算結(jié)果。如下圖所示。當(dāng)滾動(dòng)條的值改變時(shí)，在相應(yīng)的標(biāo)簽中顯示滾動(dòng)條的值。當(dāng)單擊【算】按鈕時(shí)，能夠?qū)?biāo)簽Label1Label2中顯示的兩個(gè)值求積，并將結(jié)果顯示在Label3中。以下不能實(shí)現(xiàn)上述功能的事件過(guò)程是 。PrivateSubCommand1_Click()Label3.Caption=Str(Val(Label1.Caption)*Val(Label2.Caption))EndSubPrivateSubCommand1_Click()Label3.Caption=Hscroll1.Value*HScroll2.ValueEndSubPrivateSubCommand1_Click()Label3.Caption=Hscroll1*HScroll2EndSubPrivateSubCommand1_Click()Label3.Caption=HScroll1.Text*HScroll2.TextEndSub【答案】DTextD題目要求的功能，答案是D。在窗體上有一個(gè)文本框控件，名稱(chēng)為T(mén)xtTime；一個(gè)計(jì)時(shí)器控件，名稱(chēng)為要求每一秒鐘在文本框中顯示一次當(dāng)前的時(shí)間。程序?yàn)椋篜rivateSubTimer1 TxtTime.Text=TimeEndSub在下劃線(xiàn)上應(yīng)填入的內(nèi)容是 。A)Enabled B)Visible C)Interval D)Timer【答案】D只具有Timer事件，所以本題的正確答案是選項(xiàng)D。以下選項(xiàng)中，不是VisualBasic標(biāo)準(zhǔn)控件的A)命令按鈕 B)定時(shí)器C)窗體 D)單選框【答案】C【解析】對(duì)象包括窗體和控件，控件不含窗體。標(biāo)準(zhǔn)控件指工具箱中VB6.0自帶的控件。因此，本題答案為C。文本框的默認(rèn)屬性是 。Caption B)TextC)Name D)Top【答案】B【解析】文本框的默認(rèn)屬性是Text，Text是文本框的內(nèi)容，因此，本題答案為B。標(biāo)簽?zāi)J(rèn)屬性是 。Caption B)TextC)Name D)Top【答案】A【解析】標(biāo)簽?zāi)J(rèn)屬性是Caption，Caption用來(lái)改變標(biāo)題信息。因此，本題答案為A。滾動(dòng)條的默認(rèn)屬性是 。Min B)MaxC)Value D)Name【答案】C【解析】滾動(dòng)條的默認(rèn)屬性是Value屬性。滾動(dòng)條Value屬性的值隨著滾動(dòng)滑塊位置的改變而改變，是一個(gè)整型數(shù)據(jù)。只能用來(lái)顯示字符信息的控件是 。A)圖像框 B)圖形框C)標(biāo)簽框 D)文本框【答案】C文本框不僅能夠顯示字符信息，還能編輯字符信息。確定復(fù)選框是否選中，應(yīng)訪問(wèn)的屬性是 。A)Selected B)CheckedC)Style D)Value【答案】DSelectedChecked屬性。SelectedStyle屬性決定了復(fù)選框的外觀。設(shè)置命令按鈕的標(biāo)題文字時(shí)，應(yīng)改變的屬性是 。A)Text B)CaptionC)Name D)FontName【答案】B【解析】命令按鈕沒(méi)有Text屬性。Name屬性是命令按鈕的名稱(chēng)，F(xiàn)ontName屬性是命令按鈕的標(biāo)題文字所采用的字體名。若要獲得滾動(dòng)條的當(dāng)前值，可訪問(wèn)的屬性是 。A)Min B)MaxC)Text D)Value【答案】D【解析】滾動(dòng)條沒(méi)有Text屬性。滾動(dòng)條的MinMax最大值。當(dāng)滾動(dòng)滑塊的位置移動(dòng)時(shí)，滾動(dòng)條的Value屬性值也隨之改變。命令按鈕能響應(yīng)的事件是 。A)DblClick B)ClickC)Scroll D)Load【答案】B【解析】命令按鈕不支持DblClick事件。命令按鈕也沒(méi)有Load和Scroll事件。命令按鈕能響應(yīng)的事件在四個(gè)選項(xiàng)中只有Click事件。設(shè)置組合框的樣式，可用的屬性是 。A)BackStyle B)BorderStyleC)Style D)Sorted【答案】CBackStyleBorderStyleSorted否按序排列，若設(shè)置為T(mén)rueStyle屬性控為復(fù)選框樣式。要設(shè)置計(jì)時(shí)器控件的定時(shí)時(shí)間，需設(shè)置的屬性是。A)Interval B)EnabledC)Value D)Text【答案】AValueTextEnabledInterval毫秒數(shù))發(fā)計(jì)時(shí)器兩個(gè)事件之間的毫秒數(shù)，Interval0~65535。Change事件的操作是。A)拖動(dòng)滾動(dòng)條上的滑塊 B)單擊滾動(dòng)條上的滑塊C)單擊滾動(dòng)條兩端的箭頭 D)單擊箭頭與滑塊之間的滾動(dòng)條【答案】BValueLargeChangeSmallChange屬性的改變量決定滑塊的移動(dòng)量。它們都能使?jié)L動(dòng)條的Value屬性值改變，因此也就能夠觸ChangeValue屬性值，也不能觸Change事件。不能作為容器使用的對(duì)象是 。A)窗體 B)框架C)圖形框 D)圖像框【答案】D像框不能放置其他控件，不能作為容器使用。VB6.0應(yīng)用程序提供的一組單選鈕所具有的功能是 。A)選擇一次 B)選擇多次C)單一選擇 D)多個(gè)選擇【答案】CVB6.0二．練習(xí)題單項(xiàng)選擇題用于設(shè)置命令按鈕控件的外觀樣式的屬性是 。Image B)Picture C)Style D)Caption用于設(shè)置命令按鈕是否為取消按鈕的屬性是 。Image B)Default C)Cancel D)Caption鼠標(biāo)停留在控件上時(shí)將顯示一文本內(nèi)容該文本內(nèi)容是通過(guò) 屬性設(shè)置的。Text B)CaptionC)ToolTipText D)HelpContextID設(shè)置標(biāo)簽中顯示的文本的對(duì)齊方式使用 屬性。Alignment B)BorderStyle C)AutoSize D)TabIndex標(biāo)簽控件顯示文本是使用 屬性來(lái)實(shí)現(xiàn)的。Caption B)Text C)Alignment D)Visible標(biāo)簽和文本框都可以用于顯示文本，正確的敘述是 。標(biāo)簽、文本框中的文本都是只讀文本文本框、標(biāo)簽中的文本都是可編輯的文本標(biāo)簽中的文本是只讀文本，文本框中的文本是可編輯的文本標(biāo)簽中的文本是可編輯的文本，文本框中的文本是只讀文本用來(lái)設(shè)置文本框控件中有無(wú)滾動(dòng)條的屬性是 。Appearance B)MultiLine C)ScrollBars D)SelText通過(guò) 方法可以將焦點(diǎn)移到指定的對(duì)象上。GotFocus B)SetFocusC)KeyPress 在文本框中輸入新信息時(shí)，能同時(shí)引發(fā)的事件是 。KcyPress和Click B)KeyPress和LostFocusC)KeyPress和Change D)Change和LostFocus在列表框中當(dāng)前被選中的列表項(xiàng)的序號(hào)是由 屬性返回的。A)Columns B)List C)）ListIndex D)ListCount列表框的AddItem方法的作用是 。清除列表框中的全部?jī)?nèi)容重新設(shè)置列表框控件外觀向列表框添加項(xiàng)目顯示列表框中的列表項(xiàng)目數(shù)從列表框中刪除一個(gè)項(xiàng)目使用 方法。A)RemoveItem B)AddItem C)Clear D)Move組合框可以看成是 和文本框的組合。列表框 B)命令按C)復(fù)選框 D)單選按鈕下面關(guān)于框架的說(shuō)法錯(cuò)誤的是 。是一個(gè)容器C)框架可以接收用戶(hù)輸入D)當(dāng)框架控件的Enabled屬性設(shè)置為False時(shí)，框架中的所有控件都被屏蔽。用鼠標(biāo)拖動(dòng)滾動(dòng)條上的滑塊時(shí)將觸發(fā) 事件。A)Change B)KeyPress C)Scroll D)KeyDown當(dāng)滾動(dòng)條上滑塊的位置改變時(shí)將觸發(fā) 事件。A)Scroll B)Change C)Scroll和Change D)Move將指定的圖片文件加載到當(dāng)前對(duì)象中可在屬性窗口使用 屬性。A)Picture B)CurmetX C)AutoSize D)Stretch為了讓圖片框的大小可以自動(dòng)適應(yīng)所加載的圖像大小，則應(yīng)該 。A)設(shè)置Stretch屬性值為T(mén)rueB)設(shè)置AutoSize屬性值為T(mén)rueC)設(shè)置Stretch屬性值為False D)設(shè)置AutoSize屬性值為為了讓圖像框的大小可以自動(dòng)適應(yīng)所加載的圖像大小，則應(yīng)該 。A)設(shè)置Stretch屬性值為T(mén)rueB)設(shè)置AutoSize屬性值為T(mén)rueC)設(shè)置Stretch屬性值為False D)設(shè)置AutoSize屬性值為在窗體、圖片框或圖像框中裝入圖形使用 函數(shù)。PictureLoad B)LoadPictureC)LoadImage D)ImageLoad卸載在圖片框中已經(jīng)加載的位圖圖像使用 。Picturel.Picture語(yǔ)句Picturel.PictureLoadPicture("…")語(yǔ)句Picturel=LoadPicture語(yǔ)句選擇圖片框，在彈出的快捷菜單中選擇“刪除”下列事件中屬于計(jì)時(shí)(Timer)的事件是 。A)Click B)DblClick C)Timer D)KeyDownLabel1正確的是。Label1.BackStyle=0 B)Label1.BackStyle=0Label1.BorderStyle=1 Label1.BorderStyle=0C)Label1.BackStyle=True Label1.BorderStyle=True Label1.BorderStyle=FalseLabel1Alignment1，則該標(biāo)簽的標(biāo)題?？孔箫@(默認(rèn)方) B)靠右顯示C)居中顯示 D)垂直顯示List1Label1程序中能實(shí)現(xiàn)上述功能的程序是。PrivateSubList1_Click() B) PrivateSubList1_Clicd()Label1.Caption=List1.Selected EndSub EndSubC) PrivateSubList1_Click() D) PrivateSubList1_Click()Label1.Name=List1.Text EndSub EndSub填空題VB中的控件通常分為三種類(lèi)型： 、 和可插入的對(duì)象。在屬性窗口中用于改變選中控件的大小的屬性是 和 。鼠標(biāo)位于命令按鈕上并按下鼠標(biāo)的瞬間，所觸發(fā)的事件是 事件。當(dāng)文本框具有焦點(diǎn)時(shí)，按下鍵盤(pán)上的任意鍵，都會(huì)觸發(fā) 事件。列表框的項(xiàng)目?jī)?nèi)容是一個(gè)數(shù)組，下標(biāo)從0開(kāi)始， 是第一個(gè)列表項(xiàng)。列表框中的 和 屬性為數(shù)組。在三種不同類(lèi)型的組合框中只能選擇而不能輸入數(shù)據(jù)的是Style屬性的值為 。滾動(dòng)條響應(yīng)的重要事件有 和 。Interval屬性用于設(shè)定計(jì)時(shí)器觸發(fā)Timer事件的時(shí)間間隔，該屬性值為 屏蔽計(jì)時(shí)器。如果要求每隔15秒鐘觸發(fā)一次計(jì)時(shí)器事件，應(yīng)將Interval屬性設(shè)置為 。(名稱(chēng)為L(zhǎng)abel1)(名稱(chēng)為T(mén)imer1)下程序，該程序運(yùn)行后，單擊窗體，在標(biāo)簽中顯示當(dāng)前時(shí)間并每隔1秒鐘變換一次。PrivateSubForm_Load()Timer1.Enabled=FalseTimer1. ① =EndSubPrivateSubForm_Click()Timer1. ② =EndSubPrivateSubTimer1_Timer()Label1.Caption= EndSubLabellLabel2，Caption屬性分別為“數(shù)HScrolllMin100程序運(yùn)行后，如果單擊滾動(dòng)條兩端的箭頭，則在標(biāo)簽Label2中顯示滾動(dòng)條的值。請(qǐng)?zhí)羁諏⒊绦蜓a(bǔ)充完整。PrivateSubHscroll1 ① ()Label2. ② =EndSub【答案】單項(xiàng)選擇題（1）C（2）C（3）C（4）A（5）A（6）C（7）C（8）B（9）C（10）C（11）（12）（13）（14）（15）（16）（17）（18）（19）（20）CAACCBADCB（21）（22）（23）（24）（25）CCABD填空題標(biāo)準(zhǔn)控件，ActiveX控件Width，HeightMouseDownKeyDown（KeyUp）List(0)List，Selected（7）2（8）Scroll事件，Change事件（9）0（10）15000①I(mǎi)nterval ②Enabled ③Time①_Change ②Caption5章程序設(shè)計(jì)基礎(chǔ)一．例題解析執(zhí)行下列語(yǔ)句后，Print語(yǔ)句的輸出結(jié)果是 。a=8：b=9Print A）-1 B）0 C）True D）False【答案】D【解析】VB中使用常量True表示邏輯真，F(xiàn)alse表示邏輯假。表達(dá)式a>b的結(jié)果是邏輯假，所以Print語(yǔ)句的輸出結(jié)果為False。設(shè)x為整型變量，能正確表示1<x<5的邏輯表達(dá)式是 。A）1<x<5 B）1<x or x<5C）1<x And x<5 D）1<x && x<5【答案】CVBAnd運(yùn)算符。函數(shù)Int(Rnd(2)*10)產(chǎn)生的是閉區(qū)間 范圍的整數(shù)。A）[0,9] B）[1,10] C）[0,10] D）[1,9]【答案】A【解析】Rnd函數(shù)產(chǎn)生的是區(qū)間(0,1)之間的隨機(jī)數(shù)，所以Rnd(2)*10產(chǎn)生的是區(qū)間(0,10)之間的隨機(jī)數(shù)，Int函數(shù)的功能是截尾取整，即舍去所有的小數(shù)部分。下列四個(gè)表達(dá)式中，其值為0的是 。A）3/4 B）3\4 C）4Mod3 D）3Mod4【答案】B【解析】在此題中出現(xiàn)了三種運(yùn)算符Mo選項(xiàng)A0.75；選項(xiàng)B0；選項(xiàng)C1；選項(xiàng)D。下列常量表示中，合法的長(zhǎng)整型常量是 。A)123456@ B)0& C)31276! D)345#【答案】B【解析】VB6.0中可以使用類(lèi)型后綴識(shí)別常量的類(lèi)型，@是貨幣型常數(shù)，&是長(zhǎng)整數(shù)，!是單精度常數(shù)，#是雙精度數(shù)。下面邏輯表達(dá)式的值為真的是 。"ABC">"abc" B)"ABC">"b23"C)"ABC">"ABC" D)"ABC">"ABC"【答案】D等。若二者不相等，則以第一個(gè)出現(xiàn)的不同字符比較結(jié)果為準(zhǔn)。下列函數(shù)中，返回值是字符串的是 。Chr B)Instr C)Val D)Asc【答案】A【解析】函數(shù)Chr的功能是將ASCII碼轉(zhuǎn)換成字符；函數(shù)Instr的功能是返回一個(gè)字符ValAscASCII碼。以下聲明語(yǔ)句中錯(cuò)誤的是 。A)Constvarl=123 B)Dimvar2='ABC'C)DefInta-z D)Staticvar3AsInteger【答案】BBDim始值的，因而該選項(xiàng)是錯(cuò)誤的。下列可作為VisualBasic變量名的是 。A)A#A B)4A C)?xy D)constA【答案】DVisualBasic變量命名的規(guī)則是：變量名的第一個(gè)字符必須是字母并由字母、255VB保留字。在上述選項(xiàng)中，選項(xiàng)AB以數(shù)字開(kāi)頭，選項(xiàng)C均不滿(mǎn)足變量的命名規(guī)則。函數(shù)String(n,"str")的功能是 。把數(shù)值型數(shù)據(jù)轉(zhuǎn)換為字符串B)nn個(gè)字符n個(gè)字符的位置開(kāi)始取子字符串【答案】B【解析】函數(shù)String(n,"str")返回由n個(gè)字符"s"組成的字符串。Command1和Label1，文本框的Text屬性設(shè)置為空白，然后編寫(xiě)如下事件過(guò)程：PrivateSubCommand1_Click()x=Int(Val(Textl.Text)+0.5)Label1.Caption=Str(x)EndSub程序運(yùn)行后，在文本框中輸入28.653，單擊命令按鈕，標(biāo)簽中顯示的內(nèi)容是 。A)27 B)28 C)29 D)30【答案】CInt串轉(zhuǎn)換成數(shù)值；Str函數(shù)的功能是將一個(gè)數(shù)值表達(dá)式轉(zhuǎn)換成一個(gè)字符串。本題中使用"28.653"轉(zhuǎn)換成數(shù)值28.653，Int(28.653+0.5)的值是29，Str29LabelCaption29。在窗體上畫(huà)一個(gè)命令按鈕名稱(chēng)為CommandlPrivateSubCommandl_Click()b=5c=6Printa=b+cEndSub程序運(yùn)行后，單擊命令按鈕，輸出結(jié)果是 。A)a=11 B)a=b+c C)11 D)False【答案】D【解析】本題出現(xiàn)在Printa、bc0、、6ab+c的值不相等，所以表達(dá)式“a=b+cFalse。在窗體上放置兩個(gè)文本框和一個(gè)命令按鈕，并編寫(xiě)如下事件過(guò)程：PrivateSubCommand1_Click()DimaAsInteger,bAsIntegera=Text1.Textb=Text2.TextPrint a+b;Text1+EndSub程序運(yùn)行后，在Text1中輸入3，在Text2中輸入4，然后單擊命令按鈕，則輸出結(jié)果為 。A)3434 B)347C)734 D)77【答案】CTextab已經(jīng)聲明為整型，所Text1Text2aa+b是數(shù)值的加法運(yùn)算，輸出結(jié)果為整數(shù)7；而Text1+Text234二．練習(xí)題單項(xiàng)選擇題CInt函數(shù)的返回值類(lèi)型是 。整型 B)字符串C)變體 D)字符串或整型在VB中，常量22#的數(shù)據(jù)類(lèi)型是 。A）整型 B）雙精度型 C）單精度實(shí)型 D）長(zhǎng)整型設(shè)當(dāng)前日期是2004年4月30日表達(dá)式，PrintDay(Now)的輸出結(jié)果是 。A)2004 B)4/30/04 C)30 D)4下述四個(gè)字"C""z"、"A"和"8"中，ASCII碼值最小的是 。A)"C" B)"8" C)"A" D)"z"VB中1e-6寫(xiě)成普通十進(jìn)制數(shù)是 。A)0.000001 B)–0.000001C)1.00005 D)–1.00005函數(shù)InStr()返回的是 數(shù)據(jù)。字符串類(lèi)型 B)長(zhǎng)整型 C)單精度類(lèi)型 D)字節(jié)型表達(dá)式10^3的值是 。A）-1000 B）0.001 C）1000 D）-0.001VB變量名abc%的類(lèi)型是 。字符串類(lèi)型 B)單精度類(lèi)型C)整型 D)雙精度類(lèi)型下面VB程序運(yùn)行結(jié)果的值是 。PrivateSubCommand1_Click()Dimsa=1：b=2：c=3s=a<bOrb<cOrc<aPrintsEndSubTrue B)False C)0 D)Boolean（10）方法PrintInt(11111.5555*100+0.5)/100輸出結(jié)果是 。A)11111.55 B)11111.00 C)11111 D)11111.56方法PrintFormat(122.3,"00000.000")輸出結(jié)果是 。A)12.230 B)12.23 C)122.30 D)00122.300下列名稱(chēng)表示變體數(shù)據(jù)類(lèi)型的是 。A)Boolean B)Currency C)Double D)Variant下列不能定義一個(gè)整型變量test的語(yǔ)句的是 A)PublictestAsInteger B)DimtestAsIntegerC)Dimtest% AsInteger D)Dimtest%下面程序運(yùn)行后，單擊窗體，窗體輸出為 。DefStrX-ZPrivateSubForm_Click()x="a":y="b":z="c"x="1":y="2":z="3"x=y:y=z:z=t=x+ya=Val(t)+PrintaEndSubA)21 B)323 C)232 D)25以下語(yǔ)句的輸出結(jié)果是 。PrintFormat$(32548.56,"###,###.#")A)32548.6 B)32,548.6 C)032,548.56以下關(guān)系表達(dá)式中，其值為False的是 。A)"ABC">"AbC" B)"the"<>"they"C)"VISUAL"=UCase("Visual") D)計(jì)算結(jié)果為0的表達(dá)式是 。A)Int(2.3)+Int(-2.8) B)Cint(2.3)+Cint(-2.8)C)Fix(2.3)+Int(-2.8) D)Fix(2.3)+Fix(-2.8)

D)32548.56填空題設(shè)a=18,b=25,c=30,d=10,表達(dá)式的d>cOrNota>b的值是 。用DimabcAsVariant定義的abc變量類(lèi)型是 。將數(shù)學(xué)表達(dá)式Cos2(a+b)+5e2寫(xiě)成VB的表達(dá)式，其正確的形式是 。執(zhí)行以下程序段后，變量c的值是 。a="12A34"： b="78"c=Val(a)+Val(b)有如下程序PrivateSubForm_Click()Dimz1,z2AsIntegerz1=15.6： z2=Printz1;z2EndSub運(yùn)行后，單擊窗體，則輸出的結(jié)果是 ?！敬鸢浮繂雾?xiàng)選擇題（1）A（2）B（3）C（4）B（5）A（6）B（7）C（8）C（9）A（10）D（11）（12）（13）（14）（15）（16）（17）DDCDBAD填空題True變體類(lèi)型（3）Cos(a+b)^2+5*Exp(2)（4）90（5）15.6 16第6章程序流程控制一．例題解析設(shè)有語(yǔ)句 x=InputBox("輸入數(shù)值","0","示例"), 程序運(yùn)行后如果從鍵盤(pán)上輸數(shù)值10并按回車(chē)鍵，則下列敘述中正確的是 。x10InputBox對(duì)話(huà)框標(biāo)題欄中顯示的是“示例”0是默認(rèn)值x"10"【答案】D【解析】InputBox函數(shù)一般格式是：InputBox(<提示>[,標(biāo)題][,默認(rèn)值][,X][,Y][,幫助文件名,上下文編號(hào)])1D是正確答案。在窗體上放置一個(gè)命令按鈕，然后編寫(xiě)如下事件過(guò)程：PrivateSubCommand1_Click()Dima,baInputBox("")bInputBox("PrintbaEndSub程序運(yùn)行后，單擊命令按鈕，在輸入對(duì)話(huà)框中分別輸入 321和456，輸出結(jié)為 。A)321456 B)456321C)777 D)有語(yǔ)法錯(cuò)誤，不能執(zhí)行【答案】B【解析】“+”運(yùn)算符有兩個(gè)作用：對(duì)于字符串型運(yùn)算數(shù)，執(zhí)行字符串連接運(yùn)算；對(duì)InputBoxab456321。運(yùn)行下列程序，單擊窗體，則消息框中顯示的提示是。PrivateSubForm_Click()MsgBoxStr(123+EndSubA)123+123 B)"246"C)246 D)顯示出錯(cuò)信息【答案】CMsgBoxStr(123+123)是消息框中要顯示的提示信Str(123MsgBox符。執(zhí)行如下語(yǔ)句后，Print語(yǔ)句的輸出結(jié)果是 。A=100PrintIIf(A>50,"Large","Small")1000 B)True C)Large D)Small【答案】CIIFIIf(123)1的值為T(mén)rue23C下列語(yǔ)句中，與Else匹配的If語(yǔ)句是 。Ifx>0ThenIfx<10ThenPrintxElsePrintEndifEndif第一個(gè) B)第二個(gè)C)第一個(gè)或第二個(gè) D)程序有錯(cuò)誤【答案】BIf語(yǔ)句的嵌套時(shí)，ElseIf運(yùn)行下列程序，單擊窗體，則輸出結(jié)果是 。PrivateSubM=5IfM>=0ThenN=IfM>=1ThenN=2IfM>=2ThenN=3PrintN;EndSubA)1 B)2 C)3 D)123【答案】C5M>＝0，條件滿(mǎn)足，變量N1；繼續(xù)判斷第二個(gè)條件M>=1，條件仍然滿(mǎn)足，變量NNPrintN。運(yùn)行下列程序，單擊窗體，從鍵盤(pán)輸入50，則輸出結(jié)果是。PrivateSubForm_Click()a=Val(InputBox("A="))SelectCaseaCaseIs<100:Printa+CaseIs<80:Printa+CaseIs<60:Printa+CaseElse:Printa+4;EndEndSubA)51 B)52 C)53 D)51525354【答案】ASelectCase語(yǔ)句的執(zhí)行方法是：用測(cè)試表達(dá)式的值與第一個(gè)CaseCaseSelect執(zhí)行；如果不匹配，依次比較第二、第三、……各Case子句。＝5，與第一Case子句的條件匹配Is<10，所以輸出結(jié)果是51。For循環(huán)中，循環(huán)控制變量的增量（循環(huán)步長(zhǎng)）。只能是整數(shù) B)只能是正整數(shù)只能是不為0的整數(shù) D)任何數(shù)值型數(shù)據(jù)【答案】DFor在循環(huán)體內(nèi)，必須有可以結(jié)束循環(huán)的語(yǔ)句，否則會(huì)形成“死循環(huán)運(yùn)行下列程序后，單擊窗體，則其中的循環(huán)體一共被執(zhí)行 次。PrivateSubForm_Click()ForI=7To100StepPrintINextIEndSubA)16 B)17 C)18 D)19【答案】D【解析】For～Next循環(huán)中，循環(huán)體的執(zhí)行次數(shù)=Int((上界下界)/步長(zhǎng)+1)Int((100-7)/5+1)。運(yùn)行下列程序，單擊窗體，則運(yùn)行結(jié)果是 。PrivateSubForm_Click()Forx=1To2a=0Fory=1Tox+a=a+1NextyPrinta;NextxEndSubA)1 1 B)0 0C)1 2 D)2 3【答案】D【解析】本題是嵌套兩層的For循環(huán)結(jié)構(gòu)，外層循環(huán)控制變量是1控制執(zhí)行兩次循環(huán)體，每次執(zhí)行循環(huán)體的第—個(gè)語(yǔ)句是把0a，執(zhí)行循環(huán)體的最后a的值，用內(nèi)層循環(huán)計(jì)算a的值，當(dāng)x1時(shí)，內(nèi)層循環(huán)執(zhí)行2次，每次a1a2，2x23a1a3，3Print語(yǔ)句以分號(hào)2。運(yùn)行下列程序，單擊窗體，則執(zhí)行結(jié)果是 。PrivateSubForm_Click()s=0Dos=(s+1)*(s+2)Number=Number+1LoopUntils>=30PrintNumber;sEndSubA)01 B)30 30C)4 30 D)3 182【答案】D【解析】本題使用了Do～LoopUntil循環(huán)結(jié)構(gòu)，循環(huán)初始設(shè)置s0(s+1)*(s+2)計(jì)算出新的s1次執(zhí)行后s的值是2234s1231314s182s的303次循環(huán)，Numberl，所以Number3，s182。以下能夠正確計(jì)算n!的程序是。PrivateSubCommandl_Click()n=5:x=1Dox=x*ii=i+1LoopWhilei<nPrintxEndSubPrivateSubCommandl_Click()n=5:x=l:i=lDox=x*ii=i+1LoopWhilei<nPrintxEndSubPrivateSubCommandl_Click()n=5:x=1:i=1Dox=x*ii=i+1LoopWhilei<=nPrintxEndSubPrivateSubCommandl_Click()n=5：x=l：i=lDox=x*ii=i+lLoopWhilePrintxEndSub【答案】CAii0x0A是錯(cuò)誤的。B中各變量的初始值是正確的，錯(cuò)在判斷循環(huán)執(zhí)行的條件Whilei<ni等于5時(shí)，循環(huán)停止，所以只計(jì)算到4DWhilei>n只能執(zhí)行一次，即終止循環(huán)，即x中求出的是1在窗體上畫(huà)一個(gè)命令按鈕，名稱(chēng)為Command1。然后編寫(xiě)如下程序：PrivateSubCommand1_Click()Fori=1To4Forj=0ToiPrintChr$(65+NextjPrintNextiEndSub程序運(yùn)行后，如果單擊命令按鈕，則在窗體上顯示的內(nèi)容是 。A)BBB)AC)BD)AACCCBBCCBBBDDDDCCCDDDCCCCEEEEEDDDDEEEEDDDDD【答案】A【解析】當(dāng)i101，在同一行輸出ASC66B兩次i2C三次后換行。依此類(lèi)推。二．練習(xí)題單項(xiàng)選擇題有如下程序：PrivateSubForm_Click()ddd=MsgBox("注意",vbAbortRetryIgnore+vbExclamation,"標(biāo)題")EndSub運(yùn)行后，單擊窗體，則顯示的消息對(duì)話(huà)框是 。A)B)C)D)下面程序運(yùn)行后，單擊窗體，輸出的結(jié)果是 。PrivateSubForm_Click()Fori=10To4Step-2k=iNextiPrintk;iEndSubA)5 2 B)5 3 C)4 2下面程序中，能正確計(jì)算出10的階乘值1）的是 PrivateSubp=0Fori=1To10p=p*iNextiPrintpEndSubPrivateSubp=1Fori=1To10p=p*iNextiPrintp

4 3EndSubPrivateSubForm_Click()Fori=1To10p=0p=p*NextiPrintpEndSubPrivateSubForm_Click()Fori=1To10p=1p=p*NextiPrintpEndSub下面程序運(yùn)行后，單擊窗體，從鍵盤(pán)輸入a，輸出的結(jié)果是 PrivateSubform_Click()t=InputBox("請(qǐng)輸入一個(gè)字符：")SelectCasetCase"a"y=String(3,UCase(t))Case"A"y=String(3,LCase(t))CaseElsey="AaA"EndSelectPrintyEndSubaaa B)AAA C)AaA D)aAa下面程序運(yùn)行后，單擊窗體，輸出的結(jié)果是 。PrivateSubm=63n=14DoWhilem<>nDoWhilem>m=m-LoopDoWhilen>n=n-mLoopLoopPrintm;EndSubA)7 7 B)1 1 C)1 7 D)7 1下面程序運(yùn)行后，單擊窗體，輸出的結(jié)果是 。PrivateSubForm_Click()a$="1234512345"Fori=1ToLen(a$)k=Mid(a$,i,1)m=Trim(Str(Val(k)+2))s=s+mNextiPrintsEndSubA)30 B)50 C)3456734567 D)2345623456下面程序運(yùn)行后，單擊窗體，輸出的結(jié)果是 。PrivateSubform_Click()k="A"Fori=5To0Step-1t=t+Chr(Asc(k)+NextiPrinttEndSub運(yùn)行后輸出結(jié)果是ABCDE B)ABCDEFC)FEDCBA D)EDCBA下面程序運(yùn)行后，單擊窗體，輸出的結(jié)果是 。PrivateSubForm_Click()ForJ=4To1Step-1PrintTab(6-J);ForK=3To1Step-1Print"*";NextKPrintNextJEndSubA)***B)***C)***D)*************************************下面程序運(yùn)行后，單擊窗體，輸出的結(jié)果是 。PrivateSubForm_Click()a=100DoIfaMod2=0Thens=s+1EndIfa=a+1LoopWhilea<Printa;sEndSubA)120 12 B)120 10C)122 12 D)121 11下面程序運(yùn)行后，單擊窗體，從鍵盤(pán)輸入1，輸出的結(jié)果是 。PrivateSubx=-5s=InputBox("請(qǐng)輸入一個(gè)整數(shù)")SelectCasesCaseIs>0:y=x+1Case1To10:y=x+2CaseElse:y=x+EndPrintx;yEndSubA)-5-1 B)-5-4 C)-5-3 D)-5-5在窗體上畫(huà)一個(gè)名稱(chēng)為CommandlPrivateSubCommand1_ClickDimsumAssum=1DoUntilsum>Printsumsum=sum+LoopEndSub程序運(yùn)行后，單擊命令按鈕，則窗體上顯示的內(nèi)容是 。A)lB)1C)1D)無(wú)數(shù)據(jù)輸出324546在窗體上畫(huà)一個(gè)名稱(chēng)為CommandlPrivateSubCommand1_Click()Forn=1To10IfnMod3<>0Thenm=m+n\5NextnPrintmEndSub程序運(yùn)行后，如果單擊命令按鈕，則窗體上顯示的內(nèi)容是 。A)5 B)3 C)2 D)4有如下程序PrivateSuby=1: x=1DoUntily>x=x*yy=y+LoopPrintx;EndSub運(yùn)行后輸出的結(jié)果為A120 6 B)24 5 C)6 6 D)顯示出錯(cuò)信息下面程序運(yùn)行后，單擊窗體，則輸出結(jié)果為 。PrivateSuba$="1234"b$="-*/"Forj=4To1Step-1c$=c$+Mid$(a$,j)+Mid$(b$,j,NextjPrintEndSubA)4*34-234+1234 B)4/3*2-1C4/34*234-1234 D)出錯(cuò)填空題下列VisualBasic代碼的執(zhí)行結(jié)果是 。a=b=Ifa<bThena=a/bElseb=a\bPrinta;b執(zhí)行下面的程序段后，變量S的值為 。S=5Fori=2．6ToStepS=S+1Nexti下面程序運(yùn)行后，單擊窗體，輸出的結(jié)果是 。PrivateSubm=0Fori=-5To5Forj=5 To0 Stepm=m+1NextjNextiPrintmEndSub運(yùn)行下面程序后，單擊窗體，要求能夠顯示下圖所示的消息框，請(qǐng)?zhí)羁铡rivateSubForm_Click()asd=MsgBox("確定", +vbInformation,標(biāo)題EndSub在下面的程序中，要求循環(huán)體執(zhí)行4PrivateSubCommand1_Click()x=1DoWhilex=x+LoopPrintxEndSub202003005整PrivateSubCommand1_Click()Fori=1To20x=Int( ① *200+If ② =0ThenPrintxs=s+ ③EndIfNextiPrint"Sum=";sEndSub以下程序的功能是：從鍵盤(pán)上輸入若干個(gè)學(xué)生的考試分?jǐn)?shù)，當(dāng)輸入負(fù)數(shù)時(shí)結(jié)束輸入，然后輸出其中的最高分?jǐn)?shù)和最低分?jǐn)?shù)。請(qǐng)?zhí)羁?。PrivateSubForm_Click()DimxAsInteger，amaxAsInteger，aminAsIntegerx=InputBox("輸入一個(gè)分?jǐn)?shù)：")amax=x: DoWhile ①I(mǎi)fx>amax Then if ② Then amin=xx=InputBox("請(qǐng)輸入下一個(gè)分?jǐn)?shù)：")LoopPrint"Max="；amax，"Min="；aminEndSub【答案】單項(xiàng)選擇題（1）D（2）C（3）B（4）B（5）A（6）C（7）C（8）B（9）D（10）B（11）（12）（13）（14）AAAC填空題（1）5 1（2）9（3）33vbYesNox<8或者x<=7或者x<=8或者x<9①Rnd() ②xMod5 ③x①x>=0 x<aminx<=aminamin>xamin>=x第7章數(shù)組和用戶(hù)自定義類(lèi)型一.例題與解析Command1OptionBase1PrivateSubCommand1_Click()d=0: c=10x=Array(10,12,21,32,24)Fori=1To5Ifx(i)>cThend=d+c=x(i)Elsed=d-cEndIfNextiPrintdEndSub程序運(yùn)行后，單擊命令按鈕，則窗體上的輸出結(jié)果為 。A)89 B)99 C)23 D)77【答案】C【解析】語(yǔ)句OptionBase11xArray(10,12,21,32,24)x各元素的值分別為：x(1)=10，x(2)=12，x(3)=21，x(4)=32，x(5)=24i1時(shí)，x(i)>cd=d-cd的值為-10；i2時(shí)，x(i)>c的值為真，d=d+x(i)c=x(i)，使得dc23的值為真，執(zhí)d=d+x(i)c=x(i)dc2321;i4時(shí)，x(i)>c的值為真，執(zhí)d=d+x(i)c=x(i)，使得dc5532i5的值為假，執(zhí)d=d-cd55-32=23。Text1Command1編寫(xiě)如下事件過(guò)程：PrivateSubCommand1_Click()Dimarray1(10,10)AsIntegerDimi,jAsIntegerFori=1To3Forj=2To4array1(i,j)=i+NextjNextiText1.Text=array1(2,3)+array1(3,4)EndSub程序運(yùn)行后，單擊命令按鈕，在文本框中顯示的值是 。A)12 B)13 C)14 D)15【答案】Ai=1j的值分別為234i=2時(shí)，j、、4array(2,2)=4，array(2,3)=5，array(2,4)=6；i=3時(shí)，j的值、34array(3,2)=5，array(3,3)=6，array(3,4)=7。因此文本框內(nèi)顯示的值應(yīng)該12。設(shè)有如下程序：OptionBase0PrivateSubCommand1_Click()DimaDimiAsIntegera=Array(1,2,3,4,5,6,7,8,9)Fori=0To3Printa(5-NextEndSub程序運(yùn)行后，單擊窗體，則在窗體上顯示的是 。A)4321 B)5432 C)6543 D)7654【答案】Ca初始化后，數(shù)組各元素的值分別是：a(4)=5，a(5)=6，a(6)=7，a(7)=8，a(8)=9ForPrinta(5)、a(4)、a(3)、a(2)、5、、。用下面語(yǔ)句定義的數(shù)組的元素個(gè)數(shù)是 。DimA(-3To5)AsIntegerA）6 B）7 C）8 D）9【答案】D（-（如本例的AA(-3)、A(-2)、A(-1)、A(0)、A(1)A(2)A(3)A(4)、A(5)9個(gè)元素。設(shè)有如下數(shù)組聲明語(yǔ)句，則下列對(duì)數(shù)組元素的引用中錯(cuò)誤的是 。DimA(5)A）A(0)=1.57 B）A(6)=12 C）A(5)="qaz" D）A(1)=True【答案】B0，則數(shù)組A的A(0)A(1)A(2)A(3)、A(4)A(5)A(6)另外，在本題中聲明數(shù)組A時(shí)省略了數(shù)據(jù)類(lèi)型，則系統(tǒng)默認(rèn)為Variant類(lèi)型，即數(shù)組的每個(gè)元素可以存放不同類(lèi)型的數(shù)據(jù)。運(yùn)行下列程序，單擊窗體，則運(yùn)行結(jié)果是 。OptionBase1PrivateSubDima(10)Fori=1To10a(i)=10-i+iModNextiFori=10To1StepPrinta(i);NextiEndSubA)0 2 4 6 8 B)8 6 4 2 0C)1 3 5 7 9 D)9 7 5 3 1【答案】A【解析】本題要注意兩點(diǎn)：第一個(gè)For語(yǔ)句的循環(huán)體有一條a(i)=10-i+iMod2語(yǔ)句完成數(shù)組元素的生成；另外，第二個(gè)For語(yǔ)句的參數(shù)是10To1Step-2，逆向間隔輸出。計(jì)算數(shù)組元素中Mod運(yùn)算符優(yōu)先，當(dāng)i是奇數(shù)時(shí)Mod2的值為1，當(dāng)i是偶數(shù)時(shí)Mod2的值為0，10-i在循環(huán)中得到9 8 7，6，5，4，3，2，1，0，當(dāng)i是奇數(shù)時(shí)加1，因此a數(shù)組中的數(shù)是最后逆向間隔輸出，輸出的結(jié)果是4，6，8。運(yùn)行下列程序，單擊窗體，則運(yùn)行結(jié)果是 。OptionBase1PrivateSubForm_Click()Dimaa=Array(1,5,"abcde")Fori=1To3Printa(i);NextiEndSub1 5 abcde B)1 5 "abcde"C)出錯(cuò)信息 D)15abcde【答案】AA是變體變量，使用Array不同；并且字符串輸出是不帶定界符（一對(duì)單引號(hào)。二．練習(xí)題單項(xiàng)選擇題下面程序運(yùn)行后，單擊窗體，窗體輸出為 。OptionBase1PrivateSubForm_Click()x=Array(10,25,15,20,25,25,50,40,50,60)p=x(1)Fori=2To10Ifx(i)>pp=x(i)s=s+EndIfNextiPrintp;sEndSubA)10 10 B)60 70 C)60 135 D)10 65在窗體上放一個(gè)命令按鈕，并編寫(xiě)如下程序，運(yùn)行后單擊命令按鈕，則輸出結(jié)是 。PrivateSubCommand1_Click()DimAA=Array(1,2,3,4)S=0ForI=1To2S=S+PrintS;NextIEndSubA）2 5 B）1 3 C）5 D）4Command1PrivateSubCommand1_Click()Dimi,jAsIntegerDima(10,10)AsFori=1To3Forj=1To3a(i,j)=(i-1)*3+Printa(i,j);NextjPrintNextiEndSub程序運(yùn)行后，單擊命令按鈕，窗體上顯示的是 。A)123 B)234 C)147 D)123246 345 258 456369 456 369 789設(shè)有如下程序PrivateSubForm_Click()Dimabc()Asn1=Int(10*Rnd())n2=Int(10*Rnd()+ReDimabc(n1Ton2)PrintLBound(abc);UBound(abc)EndSub運(yùn)行程序后，多次單擊窗體，則輸出結(jié)果范圍最大的兩個(gè)數(shù)是A)10 60 B)10 59 C)0 59 D)0 60下面四個(gè)選項(xiàng)中，正確的用戶(hù)定義類(lèi)型是 。Decabc B)DecabcxmAsString xmAsString*4nlAsInteger nlAsIntegerxbAsBoolean xbAsEndDec EndDecTypeabc D)TypeabcxmAsString xmAsString*4nlAsInteger nlAsIntegerxbAsBoolean xbAsEndType EndType設(shè)有如下程序OptionBase1PrivateSubForm_Click()a張劉郝陳王")wa(1)Fori=1To4a(i)=a(i+Nextia(5)=wFori=5To1StepPrinta(i);NextiEndSub運(yùn)行程序后，輸出結(jié)果是 。張王陳郝劉 B)王陳郝劉張 C)張劉郝陳王 D)劉郝陳王張F(tuán)orm1Command1,Caption屬性值是按控件數(shù)組元素索引號(hào)順序排列的，如下圖所示。下列程序中，運(yùn)行后單擊命令按鈕，能在窗體上輸出被單擊命令按鈕的索引號(hào)和Caption屬性值的是 。PrivateSubCommand1_Click(IndexAsInteger)PrintIndex;Command1(Index).CaptionEndSubPrivateSubCommand1_Click(IndexAsInteger)PrintCommand1.Index;Command1(Index).CaptionEndSubPrivateSubCom