vb單選判斷題題庫資料

vb單項(xiàng)選擇判斷題題庫資料vb單項(xiàng)選擇判斷題題庫資料122/122vb單項(xiàng)選擇判斷題題庫資料序號(hào)題干答案1VB是一種面向?qū)ο蟮某绦蛟O(shè)計(jì)語言。對(duì)2VB經(jīng)過窗體管理組成應(yīng)用程序的各樣文件的會(huì)集。錯(cuò)3VB支持彈出菜單，所謂“彈出菜單”是指單擊鼠標(biāo)后打開的錯(cuò)菜單。4VisualBasic程序的運(yùn)行，僅能從某一窗體啟動(dòng)，如Form1錯(cuò)窗體。VisualBasic程序的運(yùn)行能夠從Main()過程啟動(dòng)，也能夠從5某對(duì)個(gè)窗體啟動(dòng)。VisualBasic供應(yīng)的幾種標(biāo)準(zhǔn)坐標(biāo)系統(tǒng)的原點(diǎn)都是在畫圖區(qū)域

的左上角，若是要把坐標(biāo)原點(diǎn)放在其他地址，則需使用自定

義

坐標(biāo)系統(tǒng)。

單擊并拖拽工具箱中所需的控件到窗體上即可完成增加控件任務(wù).

Dimi,jasinteger表示i和j都是整型變量。

Single和Double型用于保留浮點(diǎn)數(shù),在VB中定義單精度浮

點(diǎn)8位9

,雙浮點(diǎn)16位.

10Visual_basic是合法的變量名。

能夠用"&"，"+"合并字符串，但是用在數(shù)值變量時(shí)，"+"可能

會(huì)

將兩個(gè)數(shù)值加起來。

某一過程中的靜態(tài)變量在過程結(jié)束后，靜態(tài)變量及其值能夠

在

其他過程中使用。

全局變量用global或public要點(diǎn)字聲明，且僅在通用聲明

處可13以定義。若是某子程序add用publicstaticsubadd()定義，則該子14程序的變量都是局部變量。

對(duì)

錯(cuò)

錯(cuò)

錯(cuò)

對(duì)

對(duì)

錯(cuò)

錯(cuò)

錯(cuò)

設(shè)A=3,B=4,C=5,D=6，則表達(dá)式A>BAndC<=DOr2*A>C

15錯(cuò)的值是False。16全部的VB的變量,都有隱含說明字符和重申聲明兩種方法來錯(cuò)定義.17在VB中，運(yùn)算"ABCDE123A"Like"[a*a]"的結(jié)果是True。錯(cuò)18在VB中,運(yùn)算"D"Like"[!A-Z]"的結(jié)果是True.錯(cuò)19在VB中，運(yùn)算"ABA"Like"[a?a]"的結(jié)果是False。對(duì)20MsgBox()函數(shù)建立的信息框能顯示信息也能輸入信息。錯(cuò)21MsgBox()函數(shù)建立的信息框能顯示信息也能輸入用戶的信錯(cuò)息.Picture圖片框既可用來顯示圖片和繪制圖形,也可用Print22方錯(cuò)法來顯示文字.

在框架控件內(nèi)的幾個(gè)單項(xiàng)選擇按鈕中，可有一個(gè)或多個(gè)單項(xiàng)選擇按鈕

23的Value屬性為True。（正確答案：只有一個(gè)）錯(cuò)*.bmp格式的圖片，若是在autosize設(shè)為False的圖片框，24它會(huì)錯(cuò)以圖片框大小完滿顯示出來?！安藛尉帉懫鳌敝凶钌僖睢懊Q”和“標(biāo)題”這兩個(gè)框，25才錯(cuò)能正確完成菜單欄的設(shè)計(jì)。ActiveX控件是擴(kuò)展名為*.ocx的獨(dú)立文件，使用時(shí)需用26“工程”/“部件”載入或移去。對(duì)Circle方法繪制扇形或圓弧圖形時(shí)，圖形的形狀不但與初步27角、對(duì)停止角的大小相關(guān)，而且與初步角、停止角的正或負(fù)相關(guān)。28Frame控件是一種容器控件,因此它可有它自己的坐標(biāo)系.錯(cuò)29Function函數(shù)有參數(shù)傳達(dá)，而且必然有返回值。錯(cuò)30Image控件不能夠用作容器使用。對(duì)31Image控件使用的資源比Picture控件使用的多.錯(cuò)32Line(500,500)–(2500,2500)命令能夠正確畫出矩形。錯(cuò)33List1.Clear是除去List1的全部列表項(xiàng)，因此Clear是對(duì)象對(duì)的方法。move方法的一般形式是:對(duì)象名.moveA,B[,C,D],其中A指34Left錯(cuò),C指width.

35Shape控件和Line控件能夠在窗體中搬動(dòng)，因此它們擁有錯(cuò)Move方法。36Text與Label有好多共同特點(diǎn)，它們都能顯示和輸入文本。錯(cuò)Variant是一種數(shù)據(jù)種類,因此只能存放象其他數(shù)據(jù)種類一37樣,錯(cuò)無特別值.（正確：有特別值）

Variant是一種特其他數(shù)據(jù)種類，Variant種類變量能夠儲(chǔ)藏

除

了定長(zhǎng)字符串?dāng)?shù)據(jù)及自定義種類外的全部系統(tǒng)定義種類的數(shù)據(jù)。

Variant種類變量還可擁有Empty、Error和Null等特別值。

VB規(guī)定窗體文件的擴(kuò)展名是.vbp。

VB若同一個(gè)工程有好多窗體，能夠指定任一窗體為啟動(dòng)窗體。

VB贊同設(shè)計(jì)和使用用戶自己設(shè)計(jì)的控件。

VB贊同用戶使用Type語句在窗體模塊的通用聲明中自己定義

數(shù)42

據(jù)種類。

標(biāo)簽控件能夠用來讓用戶輸入數(shù)據(jù)。

標(biāo)簽沒有Change事件和SetFocus方法。

菜單中每一菜單項(xiàng)都是控件，能夠經(jīng)過點(diǎn)擊菜單項(xiàng)或經(jīng)過光

標(biāo)選

擇并按回車鍵，以觸發(fā)Click事件。

除了標(biāo)準(zhǔn)控件外，還可引入其他控件及第三方廠商研制的控

件。

窗體的Enabled屬性值為False時(shí),該窗體上的按鈕、文本框

等

控件就不會(huì)對(duì)用戶的操作做出反響。

從幾十個(gè)項(xiàng)目中任選其中一項(xiàng)或多項(xiàng)時(shí)可采用列表框或組合

框控

件實(shí)現(xiàn).

單項(xiàng)選擇鈕控件和復(fù)選框控件都擁有Value屬性，它們的作用完全相同。

50當(dāng)窗體的ScaleTop=0,ScaleLeft=0時(shí),這個(gè)窗體Top和Left值也是0.當(dāng)準(zhǔn)時(shí)器控件的Interval屬性值設(shè)置為0時(shí)，會(huì)連續(xù)不斷地激發(fā)

對(duì)

錯(cuò)

對(duì)

對(duì)

對(duì)

錯(cuò)

錯(cuò)

對(duì)

對(duì)

對(duì)

錯(cuò)

錯(cuò)

錯(cuò)

錯(cuò)

Timer事件。

當(dāng)需要在同一窗體中建立幾組相互獨(dú)立的單項(xiàng)選擇鈕時(shí)，就要用52框?qū)軐⒚恳唤M單項(xiàng)選擇鈕框起來。當(dāng)在一個(gè)簡(jiǎn)單組合框的文本框中輸入一個(gè)它的列表框中的沒53有錯(cuò)的條目時(shí)，組合框會(huì)自動(dòng)將這一條目增加到它的列表框中。54準(zhǔn)時(shí)將文本框中的數(shù)據(jù)保留到磁盤，應(yīng)用于采用Timer計(jì)時(shí)器控件。對(duì)對(duì)窗體Form內(nèi)各控件不能夠用鼠標(biāo)隨意精確定位是由于窗體中55的對(duì)定位網(wǎng)格起作用.56對(duì)象的可見性用Enabled屬性設(shè)置，可用性用Visible屬性設(shè)置。錯(cuò)57對(duì)象的屬性都能夠在屬性窗口中設(shè)置。錯(cuò)對(duì)象是基本的運(yùn)行實(shí)體，它既包括了數(shù)據(jù)(屬性)，也包括作58對(duì)用于對(duì)象的操作(方法)和對(duì)象的響應(yīng)動(dòng)作(事件)。關(guān)于文件系統(tǒng)控件，當(dāng)驅(qū)動(dòng)器控件Drive1中的驅(qū)動(dòng)器符改變時(shí)，

59文件夾列表控件Dir1中顯示的文件夾也作相應(yīng)改變，能夠在對(duì)Drive1中的Change事件中使用以下命令：Dir1.Path=Drive1.Drive。60方法是VB對(duì)象能夠響應(yīng)的用戶操作。錯(cuò)61轉(zhuǎn)動(dòng)條控件不能作為用戶輸入數(shù)據(jù)的方法。對(duì)62轉(zhuǎn)動(dòng)條控件不能作為用戶輸入數(shù)據(jù)的一種方法.錯(cuò)63轉(zhuǎn)動(dòng)條控件可作為用戶輸入數(shù)據(jù)的一種方法.錯(cuò)計(jì)時(shí)器(Timer)控件的Interval屬性的單位是毫秒，即若將64此對(duì)屬性值設(shè)為10，則每0.01秒產(chǎn)生一次Timer事件。計(jì)算機(jī)在辦理數(shù)據(jù)時(shí)必定將其裝入內(nèi)存,在高級(jí)語言中經(jīng)過內(nèi)65對(duì)存單元名來接見其中的數(shù)據(jù),命名的內(nèi)存單元就是常量或變量.

66將焦點(diǎn)主動(dòng)設(shè)置到指定的控件或窗體上，應(yīng)采用Setfocus方對(duì)法。67能夠利用鍵盤光標(biāo)選擇菜單項(xiàng),因此可響應(yīng)KeyPress事件.錯(cuò)68控件是對(duì)象，而窗體不是對(duì)象，它可是控件對(duì)象的窗口。錯(cuò)69框架控件和形狀控件都不能夠響應(yīng)用戶的鼠標(biāo)的單擊事件。錯(cuò)70利用PrivateConst聲明的符號(hào)常量，在代碼中不能夠夠再賦對(duì)值。71列表框包括了組合框的功能。錯(cuò)72列表框的中的項(xiàng)目不能夠夠多列顯示。錯(cuò)每個(gè)對(duì)象都有一系列起初定義好的對(duì)象事件，但要使對(duì)象能73響對(duì)應(yīng)詳盡的事件，則編寫該對(duì)象相應(yīng)的事件過程。74面向?qū)ο蟪绦蛟O(shè)計(jì)是一種以對(duì)象為基礎(chǔ)，由事件驅(qū)動(dòng)對(duì)象執(zhí)對(duì)行的設(shè)計(jì)方法。命令Picture1.Circle(500,800),800能夠在圖片框75Picture1對(duì)中畫出的圖形是圓心在(500,800)的一個(gè)圓。76目錄列表框中的列表項(xiàng)不能夠夠經(jīng)過AddItem方法進(jìn)行增加。對(duì)77除去Combo1對(duì)象的內(nèi)容是Combo1.Clear。對(duì)78除去list1列表框?qū)ο蟮膬?nèi)容的語句是list1.cls。錯(cuò)79若是一個(gè)菜單項(xiàng)的Visible屬性為False，則它的子菜單也不對(duì)會(huì)顯示。若是一個(gè)列表框一共有5個(gè)選項(xiàng),而當(dāng)選中第三項(xiàng)時(shí),這時(shí)列80表對(duì)框的ListIndex屬性為2.output，append方式若要新建一個(gè)磁盤上的次前言件，可用81打?qū)﹂_文件。

若已在窗體中加入了一個(gè)通用對(duì)話框：要求在運(yùn)行時(shí)，經(jīng)過

82ShowOpen打開對(duì)話框時(shí)，只顯示擴(kuò)展名為DOC的文件，則錯(cuò)對(duì)通用對(duì)話框的Filter的屬性設(shè)置應(yīng)該是："(*.DOC)|(.DOC)"。83三種方式的組合框都能夠接受DblClick事件。對(duì)84菜單設(shè)計(jì)中的每一個(gè)菜單項(xiàng)分別是一個(gè)控件，每個(gè)控件都有對(duì)自己的名字。85時(shí)鐘控件的屬性Interval值為0時(shí)，表示障蔽計(jì)時(shí)器。對(duì)

使用驅(qū)動(dòng)器列表框、目錄列表框和文件列表框組成一個(gè)文件管

理系統(tǒng)時(shí)，三者之間能夠?qū)崿F(xiàn)自動(dòng)同步，即當(dāng)在驅(qū)動(dòng)器列表框

改變驅(qū)動(dòng)器時(shí)，目錄列表框和文件列表框的內(nèi)容馬上同跟著變。

事件過程由某個(gè)用戶事件或系統(tǒng)事件觸發(fā)執(zhí)行,它不能夠被其

它87

過程調(diào)用.

事件過程與Sub過程,它們相同點(diǎn)都是事件驅(qū)動(dòng),而不相同的只

是

事件過程由控件屬性決定,而Sub過程是由戶自定義.

全部的對(duì)象都有caption屬性。

全部的控件在程序運(yùn)行今后都是可見的。

經(jīng)過改變屬性窗口中的題。Name屬性，能夠改變窗體上顯示的標(biāo)

通用對(duì)話框只能用SHOW方法進(jìn)行調(diào)用。

同一Form窗體中的各控件能夠相互重疊,其顯示的上基層次

的93

次序不能夠夠調(diào)整.

圖片框的Move方法不但能夠搬動(dòng)圖片框,而且還可以夠改變?cè)?/p>

圖94

片框的大小,同時(shí)也會(huì)改變?cè)搱D片框相關(guān)屬性的值.

圖片框的Move方法不但能夠搬動(dòng)圖片框,而且還可以夠改變?cè)?/p>

圖片

框的大小,同時(shí)也會(huì)改變?cè)搱D片框相關(guān)屬性的值.

圖片框的屬性Enabled設(shè)置為FALSE，圖片框上的控件仍可響

錯(cuò)

錯(cuò)

對(duì)

錯(cuò)

錯(cuò)

錯(cuò)

錯(cuò)

錯(cuò)

錯(cuò)

錯(cuò)96錯(cuò)

應(yīng)用戶操作。

圖象框中的Stretch屬性為true時(shí)，其作用是圖形自動(dòng)調(diào)整

97對(duì)

大小以適應(yīng)圖象控件。

98文本框控件有Caption屬性。錯(cuò)

99文件依照數(shù)據(jù)編碼方式能夠分為ASCII碼文件和二進(jìn)制文件。對(duì)

100要使準(zhǔn)時(shí)器控件起作用，其屬性Interval不能夠夠設(shè)置為0。對(duì)

搬動(dòng)框架內(nèi)的控件時(shí)框架內(nèi)的控件也隨從搬動(dòng),因此框架內(nèi)各控錯(cuò)101件的Left和Top屬性值也將分別隨之改變.

已知窗的fillcolor=rgb(255,0,0)

紅,forecolor=rgb(0,255,0)

102綠,fillstyle=0(solid)語句circle(200,100),500,,,,2的錯(cuò)輸出結(jié)果是紅邊綠心的長(zhǎng)橢圓.103用Cls方法能除去窗體或圖片框圖中用Picture屬性設(shè)置的錯(cuò)圖形.104用dim語句聲明的局部變量能保留前一次過程調(diào)用后的值.錯(cuò)用VB6.0僅能開發(fā)擁有窗口菜單的應(yīng)用程序,開發(fā)的應(yīng)用中105不錯(cuò)能支持彈出式菜單.

用鼠標(biāo)選中某菜單控件時(shí),觸發(fā)Click事件;而用鍵盤選中該

106錯(cuò)菜單控件時(shí),觸發(fā)KeyPress事件.107由VisualBasic語言編寫的應(yīng)用程序有講解和編譯兩種執(zhí)行對(duì)方式.由變量名對(duì)變量的內(nèi)容進(jìn)執(zhí)行用或更正,則使用變量就是引108用對(duì)變量的內(nèi)容.109有的對(duì)象屬性既可在屬性窗口中設(shè)定又可在程序代碼中設(shè)對(duì)定。有一個(gè)程序在屬性窗口中設(shè)置了它的窗體字體大小為10號(hào)，而110程序代碼若設(shè)置了它的窗體字體大小為20號(hào)，那么當(dāng)程序運(yùn)對(duì)行后實(shí)質(zhì)的窗體字體大小為20號(hào)。欲在PictureBox控件上設(shè)置其他控件,能夠經(jīng)過把窗體上原111已錯(cuò)設(shè)計(jì)好的控件拖動(dòng)到PictureBox控件上來實(shí)現(xiàn).112在MsgBox函數(shù)中prompt參數(shù)是必定的.對(duì)113在Sub過程中，能夠用Return語句退出Sub過程。對(duì)

在VB6.0中，若是要使窗體上的多個(gè)控件擁有相同的尺寸，114在對(duì)選擇了這些控件此后，應(yīng)執(zhí)行VB"格式"菜單中的命令。在VB6.0中，若是要增加工具箱中的控件，應(yīng)執(zhí)行VB"文件"115菜錯(cuò)單中的命令。在VB5中,文件菜單的"刪除工程"的作用是將當(dāng)前VB工程在116硬錯(cuò)盤中刪除掉.117在VB6.0中命令按鈕不但響應(yīng)Click事件,而且響應(yīng)DbClick事件.錯(cuò)在VB的工具欄中包括了全部的VB控件，我們不能夠再加載其118他的錯(cuò)控件。119在VB中，函數(shù)Fix(-3.6)的返回值是–4。錯(cuò)在VB中，計(jì)時(shí)器(Timer)如期激活Timer事件，使Timer中120的對(duì)代碼執(zhí)行一次。121在VB中,可經(jīng)過函數(shù)Now返回計(jì)算機(jī)系統(tǒng)的日期和時(shí)間.對(duì)在VB中,能夠?qū)⒃赑icture控件中繪制的圖形以文件的形式122保留對(duì)在磁盤上.123在VB中,用DIM定義數(shù)組時(shí)數(shù)組元素也自動(dòng)賦初值為0.錯(cuò)在VB中將一些通用的過程和函數(shù)編寫好并封裝作為方法供用124戶對(duì)直接調(diào)用.在VB中通用對(duì)話框的Filename屬性返回的是一個(gè)輸入或選125取的文錯(cuò)件名字符串.在VisualBasic中Dima,b,casinteger和126錯(cuò)Dimaasinteger,basinteger,casinteger相同。在標(biāo)準(zhǔn)模塊的聲明部分中用Publice聲明的變量的有效范圍127是對(duì)

其所在的工程。

在表達(dá)式中,運(yùn)算符兩端的數(shù)據(jù)種類要求一致.

在程序中Name屬性是作為對(duì)象的表記而引用,不會(huì)顯示在窗

體129

上,而控件上顯示的內(nèi)容由Caption屬性決定.

在窗體模塊的聲明部分中用Private聲明的變量的有效范圍

是其

所在的工程。

在多文檔應(yīng)用中，每次只能有一個(gè)活動(dòng)的子窗體能夠進(jìn)行輸入/編寫。

在過程中用Dim和Static定義的變量都是局部變量.在框架控件內(nèi)的幾個(gè)單項(xiàng)選擇按鈕中，只能有一個(gè)單項(xiàng)選擇按鈕的

Value

屬性為True。

在框架控件上放置的控件能夠搬動(dòng)到框架控件的外面.

在利用通用對(duì)話框件顯示字體對(duì)話框從前必定設(shè)置Flags屬

性,

否則將發(fā)生不存在字體的錯(cuò)誤.

在命令按鈕的Click事件過程中,exit與end等效.在盤驅(qū)動(dòng)器列表框Drive1的Change事件過程中,代碼

137Dir1.Path=Drive1.Drive的作用是:當(dāng)Drive1的驅(qū)動(dòng)器改變時(shí),Dir1的目錄列表隨不相同驅(qū)動(dòng)器的作相應(yīng)改變.在圖片框中放置的控件既能夠在該圖片框內(nèi)搬動(dòng),也能夠移138出該圖片框外.在一個(gè)窗體的代碼中不能夠使用Unload語句來卸載本窗體,即一個(gè)

窗體只能由其他窗體卸載.

直線控件能夠在窗體上拖動(dòng)，因此它擁有MOVE方法。只要用拖拽的方法,將工具箱中所需的控件拖到窗體上即可

完成.

對(duì)

錯(cuò)

錯(cuò)

對(duì)

對(duì)

對(duì)

錯(cuò)

對(duì)

錯(cuò)

對(duì)

錯(cuò)

錯(cuò)

錯(cuò)

錯(cuò)

屬性是用來描述和反響對(duì)象特點(diǎn)的參數(shù),不相同的對(duì)象擁有各142自錯(cuò)不相同的屬性,對(duì)象的全部屬性都能夠在屬性窗口中設(shè)置.143組合框包括了列表框的功能.對(duì)組合框兼有文本框和列表框兩者的功能，用戶能夠經(jīng)過鍵入144文對(duì)本或選擇列表中的項(xiàng)目來進(jìn)行選擇。過程中的靜態(tài)變量是局部變量，當(dāng)過程再次被執(zhí)行時(shí)，靜態(tài)145變量對(duì)的初值是前一次過程調(diào)用后的值。函數(shù)過程(FunctionProcedure)用來完成特定的功能，但不146返錯(cuò)回相應(yīng)的結(jié)果。若是沒有使用Public、Private也許Friend,Sub過程在缺省147情況錯(cuò)下是公用的、若是在過程調(diào)用時(shí)使用按地址傳達(dá)參數(shù)，則在被調(diào)過程中不148可錯(cuò)以改變實(shí)參的值。若是在過程調(diào)用時(shí)使用按值傳達(dá)參數(shù)，則在被調(diào)過程中能夠149改錯(cuò)變實(shí)參的值。多文檔界面是指在一個(gè)父窗口下面能夠同時(shí)打開多個(gè)子窗口。150對(duì)子窗口歸屬于父窗口，,當(dāng)父窗口關(guān)閉時(shí)，全部子窗口所相關(guān)閉。1.在多文檔應(yīng)用中,每次只能有一個(gè)活動(dòng)的子窗體能夠進(jìn)行輸入/編寫.答案：Y

第11題文本框控件中將Text的內(nèi)容全部顯示為所定義的字符的屬性項(xiàng)是().

A:PasswordCharB:需要編程來實(shí)現(xiàn)C:PasswordD:以上都不是答案：A

第12題下面()控件不擁有Caption屬性.

A:標(biāo)簽框B:單項(xiàng)選擇鈕C:命令按鈕D:文本框答案：D

第2題三種方式的組合框都能夠接受

DblClick

事件.

答案：

Y

第

20題在多文檔應(yīng)用中

,每次只能有一個(gè)活動(dòng)的子窗體能夠進(jìn)行輸入

/編寫.

答案：Y

一、判斷共10題（共計(jì)10分）第1題Shape控件和Line控件能夠在窗體中搬動(dòng),因此它們擁有Move方法.答案：N第2題VisualBasic程序的運(yùn)行能夠從Main()過程啟動(dòng),也能夠從某個(gè)窗體啟動(dòng).答案：Y第3題圖片框的屬性Enabled設(shè)置為FALSE,圖片框上的控件仍可響應(yīng)用戶操作.答案：N第4題若已在窗體中加入了一個(gè)通用對(duì)話框:要求在運(yùn)行時(shí),經(jīng)過ShowOpen打開對(duì)話框時(shí),只顯示擴(kuò)展名為DOC的文件,則對(duì)通用對(duì)話框的Filter的屬性設(shè)置應(yīng)該是:"(*.DOC)|(.DOC)".N第5題設(shè)計(jì)菜單中每一個(gè)菜單項(xiàng)分別是一個(gè)控件,每個(gè)控件都有自己的名字.答案：Y第6題除去list1列表框?qū)ο蟮膬?nèi)容的語句是list1.cls.答案：N第7題圖片框的Move方法不但能夠搬動(dòng)圖片框,而且還可以夠改變?cè)搱D片框的大小,同時(shí)也會(huì)改變?cè)搱D片框相關(guān)屬性的值.答案：N

第8題當(dāng)窗體的ScaleTop=0,ScaleLeft=0時(shí),這個(gè)窗體Top和Left值也是0.答案：N

第9題框架控件和形狀控件都不能夠響應(yīng)用戶的鼠標(biāo)的單擊事件.答案：Y第10題通用對(duì)話框只能用SHOW方法進(jìn)行調(diào)用.答案：N二、單項(xiàng)選擇共10題（共計(jì)10分）第1題用戶能夠經(jīng)過設(shè)置菜單項(xiàng)的()屬性值為FALSE來使該菜單項(xiàng)不能見.A:HideB:CheckedC:VisibleD:Enabled答案：C第2題準(zhǔn)時(shí)器的Interval屬性以()為單位指定Timer事件之間的時(shí)間間隔.分B:秒C:毫秒D:微秒答案：C

第3題要在圖片框P1中打印字符串"HowAreYou",應(yīng)使用語句().A:Picture1.Print="HowAreYou"B:P1.Picture=LoadPicture("HowAreYou")C:P1.Print"HowAreYou"D:Print"HowAreYou"

答案：

C第4題以下關(guān)于設(shè)置控件屬性的表達(dá)正確的選項(xiàng)是

().用戶必定設(shè)置屬性值B:全部的屬性值都能夠由用戶隨意設(shè)定C:屬性值不用一一重新設(shè)置D:不相同控件的屬性項(xiàng)都完滿相同

第5題啟動(dòng)VisualBasic后,系統(tǒng)為用戶新建的工程起一個(gè)名為

答案：C

()的臨時(shí)名稱

.工程1B:窗體1C:工程D:窗體答案：A

第6題設(shè)a=10,b=5,c=1,執(zhí)行語句Printa>b>c后,窗體上顯示的是().A:TrueB:FalseC:1D:出錯(cuò)信息答案：B第7題MSGBOX函數(shù)中有4個(gè)參數(shù),其中必定寫明的參數(shù)是().指定對(duì)話框中顯示按鈕的數(shù)目B:設(shè)置對(duì)話框標(biāo)題C:提示信息D:全部參數(shù)都是可選的

C

第8題應(yīng)用程序設(shè)計(jì)完成后,應(yīng)將程序保留,保留的過程是().

只保留窗體文件即可B:只保留工程文件即可C:先保留工程文件,此后保留窗體文件

D:先保留窗體文件(或標(biāo)準(zhǔn)模塊文件),此后還要保留工程文件答案：D

第9題改變控件在窗體中的左右地址應(yīng)更正該控件的()屬性.

A:TopB:LeftC:WidthD:Right答案：B第10題

VB

認(rèn)為下面

()組變量是同一個(gè)變量

.

A:A1和a1B:SUM和SUMMARYC:AVER和

三、程序填空共3題（共計(jì)30分）

第1題'【程序填空】

AVERAGED:A1

和

A_1

答案：A'功能：以下程序的功能如(圖1)。

'

PrivateSubForm_Click()

Dima%,b%,c%,d!

Dimx1,x2

Dimp,q,r

a=InputBox("請(qǐng)輸入a的值")

b=InputBox("請(qǐng)輸入b的值")

c=InputBox("請(qǐng)輸入c的值")d=b*b-4*a*c

p=-b/(2*a)

Ifd>=0Then

'SPACE

If【?】Then

r=Sqr(d)/(2*a)

x1=p+r

x2=p-r

Else

x1=p

x2=p

'SPACE

?】

Print"x1=";x1,"x2=";x2

'SPACE

?】

q=Sqr(-d)/(2*a)

Print"x1=";p;"+";q;"i","x2=";p;"-";q;"i"

EndIf

EndSub

答案：1).d>0或0<d2).EndIf3).Else

第2題'【程序填空】

'功能：完成程序，使程序輸出值為15

'

PrivateSubCommand1_Click()

'SPACE

Dimi,j,x,【?】AsInteger

Fori=1To4

x=4

Forj=1To3

x=3

'SPACE

For【?】=1To2

'SPACE

x=x+【?】

Nextk

Nextj

Nexti

Printx

EndSub

答案：1).k2).k3).6

第3題'【程序填空】

'功能：用輸入對(duì)話框輸入x，依照如圖公式計(jì)算對(duì)應(yīng)的y，

在窗體上輸出y的值。

'

PrivateSubCommand1_Click()

'SPACE

DimxAsSingle,【?】AsSingle

'SPACE

x=Val(【?】("Pleaseinputx:","輸入X的值"))

Ifx=10Then

'SPACE

?】

ElseIfx>10Then

'SPACE

y=Sqr(x)【?】

Else

y=2*x^3+6

EndIf

Printy

EndSub

答案：1).y2).InputBox3).y=04).+Sin(x)

四、程序改錯(cuò)共3題（共計(jì)30分）

第1題'【程序改錯(cuò)】

'題目:設(shè)窗體中有圖片框Pic1，現(xiàn)要求在其中繪制10個(gè)同心圓，

爾后將此圖以Test.BMP作文件名存入磁盤。

'

OptionExplicit

PrivateSubCommand1_Click()

DimXAsInteger

DimYAsInteger

DimIAsInteger

Dimrad(9)AsInteger

X=Pic1.ScaleWidth/2

Y=Pic1.ScaleHeight/2

'FOUND

ForI=1To9

rad(I)=500*Rnd

NextI

I=9

'FOUND

DoUntilI<1

Pic1.Circle(X,Y),rad(I),RGB(256*Rnd,256*Rnd,256*Rnd)

'FOUND

I=I+1

Loop

SavePicturePic1.Image,"Test.BMP"

EndSub

答案：1).fori=0to9或fori=0to9step1

2).DoUntilI<0或dountil0>i

3).I=I-1或i=-1+i

第2題'【程序改錯(cuò)】

'題目：從計(jì)算機(jī)輸入三個(gè)數(shù),找出中間數(shù)

'

OptionExplicit

PrivateSubFindMidNum()

DimxAsInteger,yAsInteger,zAsInteger,AAsInteger

x=InputBox("PLEASEINPUTTHEFIRSTNUMBER")

y=InputBox("PLEASEINPUTTHESECONDNUMBER")

z=InputBox("PLESSEINPUTTHETHIRDNUMBER")

'FOUND

Ifx>yThen

A=x

x=y

y=A

EndIf

'FOUND

Ify=zThen

Printy

'FOUND

ElseIfx=zThen

Printz

Else

Printx

EndIf

EndSub

PrivateSubForm_Click()

FindMidNum

EndSub答案：

1).Ifx<yThen

或

Ify>xThen

2).Ify>=zThen或Ifz<=yThen

3).ElseIfx>=zThen或ElseIfz<=xThen

第3題'【程序改錯(cuò)】

'題目：輸出40以內(nèi)能夠被3整除的數(shù)，要求輸出結(jié)果為5

個(gè)數(shù)一行。

'

OptionExplicit

PrivateSubForm_Click()

Cls

DimxAsInteger

DimiAsInteger

'FOUND

i=1

Forx=1To40

If(x/3)=(x\3)Then

'FOUND

Printx

i=i+1

EndIf

'FOUND

IfiMod3=0Then

Print

EndIf

Nextx

EndSub

答案：1).i=02).Printx;3).ifimod5=0then

五、程序設(shè)計(jì)共2題（共計(jì)20分）

第1題'【程序設(shè)計(jì)】

題目：編寫函數(shù)fun其功能是：依照整型形參m，計(jì)算以下公式的值:y=1/5+1/6+1/7+1/8+1/9+1/10...+1/(m+5)比方：若m=9，則應(yīng)輸出：1.168229'要求：函數(shù)中

用到的中間變量必定聲明為Single種類。

'

答案：

DimyAsDouble

DimiAsInteger

Fori=0Tom

y=y+1/(i+5)

Next

Fun=y

第2題（10.0分）題號(hào):488'【程序設(shè)計(jì)】

'題目：(事件)單擊窗體。(響應(yīng))已知sum=1/2!-1/4!+1/6!-1/8!+1/10!,請(qǐng)將sum結(jié)果值輸出到窗體上。使用dowhile...loop語句完成程序

'答案：DimiAsIntegerDimnAsIntegeri=1p=1DoWhilei<=10p=p*iIfiMod2=0Thenn=n+1sum=sum+(-1)^(n-1)/pEndIfi=i+1LoopPrintsum一、判斷共10題（共計(jì)10分）第1題全部的對(duì)象都有caption屬性.答案：N第2題事件過程由某個(gè)用戶事件或系統(tǒng)事件觸發(fā)執(zhí)行,它不能夠被其他過程調(diào)用.答案：N第3題當(dāng)準(zhǔn)時(shí)器控件的interval屬性值設(shè)置為0時(shí),會(huì)連續(xù)不斷地激發(fā)Timer事件.答案：N第4題當(dāng)需要在同一窗體中建立幾組相互獨(dú)立的單項(xiàng)選擇鈕時(shí),就要用框架將每一組單項(xiàng)選擇鈕框起來.答案：Y

第5題在窗體模塊的聲明部分中用Private聲明的變量的有效范圍是其所在的工程.答案：N第6題VisualBasic程序的運(yùn)行能夠從Main()過程啟動(dòng),也能夠從某個(gè)窗體啟動(dòng).答案：Y第7題VB贊同設(shè)計(jì)和使用用戶自己設(shè)計(jì)的控件.答案：Y第8題在VB中,能夠?qū)⒃赑icture控件中繪制的圖形以文件的形式保留在磁盤上.答案：Y第9題Function函數(shù)有參數(shù)傳達(dá),而且必然有返回值.答案：N第10題在VB的工具欄中包括了全部的VB控件,我們不能夠再加載其他的控件.答案：N置頂二、單項(xiàng)選擇共10題（共計(jì)10分）第1題代數(shù)式x1-|a|+ln10+sin(x2+2л)/cos(57o)對(duì)應(yīng)的VisualBasic表達(dá)式是().

A:X1-Abs(A)+Log(10)+Sin(X2+2*3.14)/Cos(57*3.14/180)

B:X1-Abs(A)+Log(10)+Sin(X2+2*л)/Cos(57*3.14/180)C:X1-Abs(A)+Log(10)+Sin(X2+2*3.14)/Cos(57)D:X1-Abs(A)+Log(10)+Sin(X2+2*л)/Cos(57)答案：A第2題設(shè)計(jì)動(dòng)畫平時(shí)使用時(shí)鐘控件()來控制動(dòng)畫速度.A:EnabledB:IntervalC:TimerD:Move答案：B第3題要把一個(gè)命令按鈕設(shè)置成無效,應(yīng)設(shè)置其哪一屬性值().A:VisibleB:EnabledC:DefaultD:Cancel答案：B第4題設(shè)a=10,b=5,c=1,執(zhí)行語句Printa>b>c后,窗體上顯示的是().A:TrueB:FalseC:1D:出錯(cuò)信息答案：B第5題任何控件都擁有的屬性是().A:TEXTB:CAPTIONC:NAMED:FORECOLOR答案：C第6題當(dāng)事件能被觸發(fā)時(shí),()就會(huì)對(duì)該事件作出響應(yīng).

對(duì)象B:程序C:控件D:窗體答案：A

第7題以下表達(dá)正確的選項(xiàng)是().

對(duì)象是包括數(shù)據(jù)又包括對(duì)象數(shù)據(jù)進(jìn)行操作的方法的物理實(shí)體

B:對(duì)象的屬性只幸虧屬性窗口中設(shè)置

C:不相同的對(duì)象能鑒別不相同的事件

D:事件過程都要由用戶點(diǎn)擊對(duì)象來觸發(fā)答案：C

第8題以下關(guān)于設(shè)置控件屬性的表達(dá)正確的選項(xiàng)是().

用戶必定設(shè)置屬性值B:全部的屬性值都能夠由用戶隨意設(shè)定

C:屬性值不用一一重新設(shè)置D:不相同控件的屬性項(xiàng)都完滿相同答案：C

第9題表達(dá)式2+3*4^5-SIN(X+1)/2中最先進(jìn)行的運(yùn)算是().A:4^5B:3*4C:x+1D:SIN

答案：

C第10題一個(gè)對(duì)象能夠執(zhí)行的動(dòng)作和可被對(duì)象識(shí)其他動(dòng)作分別稱為

A:事件、方法B:方法、事件C:屬性、方法D:過程、事件

三、程序填空共3題（共計(jì)30分）

第1題'【程序填空】

().

答案：A'下面過程

max()用于求

3個(gè)數(shù)中最大值，利用這個(gè)過程求

5個(gè)數(shù)中最大值。'

PrivateSubForm_Click()Print"5個(gè)數(shù)34、124、68、73、352的最大值是："

max1=max(34,124,68)

'SPACE

max1=【?】

Printmax1

EndSub

PublicFunctionmax(ByVala%,ByValb%,ByValc%)

'SPACE

If【?】Then

m=a

Else

m=b

EndIf

'SPACEIf

【?】

Thenmax=m

Else

max=c

EndIf

EndFunction答案：

1).max(max1,73,352)2).a>b

或

b<a3).m>c

或

c<m第2題

'【程序填空】'功能：輸入數(shù)字1-7,顯示其對(duì)應(yīng)是星期幾(例:輸入

1,顯示星期日

,若是輸入其他內(nèi)容，一律顯示"輸入錯(cuò)誤")'

PrivateSubCommand1_Click()

dimxasinteger

dimyasstring

x=val(text1.text)

'SPACE

?】

case1

y="今天是星期日"

case2

y="星期一"

case3

y="星期二"

case4

y="星期三"

case5

y="星期四"

case6

'SPACE

?】

case7

y="星期六"

'SPACE

?】

y="輸入錯(cuò)誤"

endselect

Text2.Text=y

EndSub

答案：1).selectcasex2).y="星期五"3).CaseElse

第3題'【程序填空】

'功能：以下程序段用于求∑n!

'

PrivateSubForm_Click()

DimsumAsInteger,nAsInteger

n=InputBox("請(qǐng)輸入一個(gè)正整數(shù)")

sum=0

Fori=1Ton

'SPACE

sum=【?】

Nexti

Printsum

EndSub

PrivateFunctionmul(ByValxAsInteger)

DimsAsInteger,iAsInteger

s=1

'SPACE

Fori=1To【?】s=s*iNexti'SPACE【?】EndFunction答案：1).sum+mul(i)2).x3).mul=s四、程序改錯(cuò)共3題（共計(jì)30分）第1題'【程序改錯(cuò)】'題目：輸出40以內(nèi)能夠被3整除的數(shù)，要求輸出結(jié)果為5個(gè)數(shù)一行。'OptionExplicitPrivateSubForm_Click()ClsDimxAsIntegerDimiAsInteger'FOUNDi=1Forx=1To40If(x/3)=(x\3)Then'FOUNDPrintxi=i+1EndIfIfiMod5=0ThenPrintEndIf'FOUNDstepiEndSub答案：1).i=02).Printx;或?x;3).Nextx或Next第2題'【程序改錯(cuò)】'題目:程序功能為求解一元二次方程的實(shí)根，請(qǐng)修正程序中錯(cuò)誤。'OptionExplicitPrivateSubForm_Load()Dima!,b!,c!,root1#,root2#,workAsDoublea=Val(InputBox("請(qǐng)輸入系數(shù)a的值"))b=Val(InputBox("請(qǐng)輸入系數(shù)b的值"))c=Val(InputBox("請(qǐng)輸入系數(shù)c的值"))'FOUND

work=b*2-4*a*c

Ifwork>=0Anda<>0Then

'FOUND

root1=(Sqr(work))/(2*a)'FOUNDroot2=(Sqr(work))/(2*a)Debug.Print"有二個(gè)實(shí)根"+Str$(root1)+","+Str$(root2)ElseDebug.Print"無實(shí)根!"EndIfEndSub答案：1).work=b^2-4*a*c或work=b*b-4*a*c2).root1=(-b+Sqr(work))/(2*a)或root1=(Sqr(work)-b)/(2*a)或root1=(-b+Sqr(work))/(a*2)3).root2=(-b-Sqr(work))/(2*a)或root2=(-Sqr(work)-b)/(2*a)或root2=(-b-Sqr(work))/(a*2)第3題'【程序改錯(cuò)】'題目:本程序求3~100之間的全部素?cái)?shù)（質(zhì)數(shù)）并統(tǒng)計(jì)個(gè)數(shù)；同時(shí)將這些素?cái)?shù)從小到大依次寫入次前言件c:\dataout.txt；素?cái)?shù)的個(gè)數(shù)顯示在窗體Form1上。'

DimCountAsInteger,FlagAsBoolean

Dimt1AsInteger,t2AsInteger

'FOUND

Ift1Modt2=0ThenFlag=False

Nextt2

'FOUND

Count=Count+1

'FOUND

Write#1,t2

1).Open"dataout.txt"ForOutputAs#1或Open"dataout.txt"ForOutputAs1

2).IfFlagThen或IfFlag=trueThen

3).Write#1,t1或Write1,t1

五、程序設(shè)計(jì)共2題（共計(jì)20分）

第1題'【程序設(shè)計(jì)】

'題目：

(事件)雙擊窗體。

(響應(yīng))s=20+21+22+

+263，求

s的值，并將結(jié)果儲(chǔ)藏到變量

S中。'

答案：

DimiAsInteger

i=20

Whilei<=263

s=s+i

i=i+1

Wend

Print(CStr(s))

第2題

'【程序設(shè)計(jì)】'題目：

(事件)單擊窗體。

(響應(yīng))編寫程序求

10×11×12+11×12×13++15×的16結(jié)×果17，并將結(jié)果輸出到窗體上。將結(jié)果存入變量

M中'

答案：

Dimi,jAsInteger

DimsAsLong

Fori=10To15

s=1

Forj=iToi+2

s=s*j

Next

m=m+s

Next

Print(CStr(m))

試卷編號(hào)：8111

一、判斷共20題（共計(jì)20分）

第1題由VisualBasic語言編寫的應(yīng)用程序有講解和編譯兩種執(zhí)行方式.答案：

Y第2題在VB中,運(yùn)算"ABCDE123A"Like"[a*a]"的結(jié)果是True.答案：Y

第3題在圖片框中放置的控件既能夠在該圖片框內(nèi)搬動(dòng),也能夠移出該圖片框外.答案：N

第4題在MsgBox函數(shù)中prompt參數(shù)是必定的.答案：Y

第5題VB支持彈出菜單,所謂"彈出菜單"是指單擊鼠標(biāo)后打開的菜單.答案：N

第6題Listl.clear是除去Listl的全部列表項(xiàng),因此Clear是對(duì)象的方法.答案：Y

第7題在過程中用Dim和Static定義的變量都是局部變量.答案：Y第8題在窗體模塊的聲明部分中用Private聲明的變量的有效范圍是其所在的工程.答案：N第9題通用對(duì)話框只能用SHOW方法進(jìn)行調(diào)用.答案：N第10題對(duì)窗體Form內(nèi)各控件不能夠用鼠標(biāo)隨意精確定位是由于窗體中的定位網(wǎng)格起作用.Y第11題在框架控件內(nèi)的幾個(gè)單項(xiàng)選擇按鈕中,只能有一個(gè)單項(xiàng)選擇按鈕的Value屬性為True.Y第12題從幾十個(gè)項(xiàng)目中任選其中一項(xiàng)或多項(xiàng)時(shí)可采用列表框或組合框控件實(shí)現(xiàn).答案：N第13題若已在窗體中加入了一個(gè)通用對(duì)話框:要求在運(yùn)行時(shí),經(jīng)過ShowOpen打開對(duì)話框時(shí),只顯示擴(kuò)展名為DOC的文件,則對(duì)通用對(duì)話框的Filter的屬性設(shè)置應(yīng)該是:"(*.DOC)|

(.DOC)".答案：N第14題在VB中,用DIM定義數(shù)組時(shí)數(shù)組元素也自動(dòng)賦初值為0.答案：N第15題利用PrivateConst聲明的符號(hào)常量,在代碼中不能夠夠再賦值.答案：Y第16題在VB中,計(jì)時(shí)器(Timer)如期激活Timer事件,使Timer中的代碼執(zhí)行一次.答案：Y第17題若是一個(gè)菜單項(xiàng)的Visible屬性為False,則它的子菜單也不會(huì)顯示.答案：Y第18題經(jīng)過改變屬性窗口中的Name屬性,能夠改變窗體上顯示的標(biāo)題.答案：N第19題在VB中,運(yùn)算"D"Like"[!A-Z]"的結(jié)果是True.答案：N

第20題在利用通用對(duì)話框件顯示字體對(duì)話框從前必定設(shè)置Flags屬性,否則將發(fā)生不存在字

體的錯(cuò)誤.Y

二、單項(xiàng)選擇共20題（共計(jì)20分）

第1題用戶能夠經(jīng)過設(shè)置菜單項(xiàng)的()屬性值為FALSE來使該菜單項(xiàng)不能見.A:HideB:CheckedC:VisibleD:Enabled

答案：

C第2題要使得窗體在出現(xiàn)從前就完成相關(guān)的程序設(shè)置可在

()事件中進(jìn)行編程

.A:linkopenB:KeyPressC:loadD:click

答案：C第3題窗體的Caption屬性的作用是().A:確定窗體的名稱B:確定窗體的標(biāo)題

第4題"對(duì)象"是計(jì)算機(jī)系統(tǒng)運(yùn)行的().

C:確定窗體的界線種類

D:確定窗體的字體

B程序單位B:邏輯單位C:物理實(shí)體D:基本實(shí)體答案：D

第5題設(shè)a=10,b=5,c=1,執(zhí)行語句Printa>b>c后,窗體上顯示的是().

A:TrueB:FalseC:1D:出錯(cuò)信息答案：B

第6題在窗體上建立了多個(gè)控件,如TEXT、LABEL1、COMMAND1,若要使程序一運(yùn)行焦點(diǎn)就定位在COMMAND1控件上,應(yīng)將COMMAND1控件的()設(shè)置為0.

A:INDEXB:TABINDEXC:TABSTOPD:ENABLED答案：B第7題將通用對(duì)話框種類,設(shè)置為字體對(duì)話框,可更正該控件的()屬性.A:fontB:filenameC:filterD:action答案：D第8題設(shè)置列表框選中的文本用()屬性.A:selectedB:captionC:textD:list答案：D第9題能夠改變窗體邊框線種類的屬性是().A:FontStyleB:BorderStyleC:BackStyleD:Border答案：B第10題以下哪個(gè)變量的取法是不正確的().A:sTmeB:T_TempC:T12%D:T_12答案：C第11題選中復(fù)選框控件時(shí),value屬性的值,能夠是().A:TrueB:falseC:0D:1答案：D第12題要除去已經(jīng)在圖片框Picture中打印的字符串而不除去圖片框中的圖像,應(yīng)使用語句().A:A.P1.ClsB:P1.picture=LoadPicture("")C:P1.Print""D:P1.piture""答案：A第13題控件內(nèi)的對(duì)齊方式()屬性決定.A:AlignmentB:WordWrapC:AtuoSizeD:Style答案：A第14題除去列表框的全部選項(xiàng)應(yīng)選擇以下哪一種方法().A:ClearB:ClsC:ClearItemD:RemoveItem答案：A第15題以下賦值語句正確的選項(xiàng)是().A:Text1.text=Text.text+Text2.textB:T=Text1.Name+Text2.NameC:Text1.Caption=Text1.Caption+Text2.CaptionD:Text1.Enable=Text1.Enable+Text2.Enable答案：A

第16題已知A?B?C中C最小,則判斷A?B?C能否組成三角形三條邊長(zhǎng)的邏輯表達(dá)式是().A:A>=BAndB>=CAndC>0B:A+C>BAndB+C>AAndC>0C:(A+C)>=CAndA-C<=C)AndC>0D:A+B>CAndA-B>CAndC>0

答案：

B第17題形狀控件所顯示的圖形不能能是().

A:圓B:橢圓C:圓角正方形D:等邊三角形答案：D第18題要在圖片框P1中打印字符串"HowAreYou",應(yīng)使用語句().

A:Picture1.Print="HowAreYou"B:P1.Picture=LoadPicture("HowAreYou")

C:P1.Print"HowAreYou"D:Print"HowAreYou"答案：C

第19題文本框中選定的內(nèi)容,由以下()屬性反響.A:TextB:CaptionC:SeltextD:sellenght答案：C第20題在一個(gè)語句行內(nèi)寫多條語句時(shí),語句之間應(yīng)該用()分開.逗號(hào)B:分號(hào)C:頓號(hào)D:冒號(hào)答案：D

三、程序填空共2題（共計(jì)10分）

第1題'【程序填空】

'題目：以下程序的功能如(圖1)。

'

PrivateSubForm_Click()

Dima%,b%,c%,d!

Dimx1,x2

Dimp,q,r

a=InputBox("請(qǐng)輸入a的值")

b=InputBox("請(qǐng)輸入b的值")

c=InputBox("請(qǐng)輸入c的值")

d=b*b-4*a*c

p=-b/(2*a)

Ifd>=0Then

'SPACE

If【?】Then

r=Sqr(d)/(2*a)

x1=p+r

x2=p-r

Else

x1=p

x2=p

'SPACE

?】

Print"x1=";x1,"x2=";x2

'SPACE

?】

q=Sqr(-d)/(2*a)

Print"x1=";p;"+";q;"i","x2=";p;"-";q;"i"

EndIf

EndSub

答案：1).d>0或0<d2).EndIf3).Else

第2題

'【程序填空】'下面過程

max()用于求

3個(gè)數(shù)中最大值，利用這個(gè)過程求

5個(gè)數(shù)中最大值。'

PrivateSubForm_Click()Print"5個(gè)數(shù)34、124、68、73、352的最大值是："

max1=max(34,124,68)

'SPACE

max1=【?】

Printmax1

EndSub

PublicFunctionmax(ByVala%,ByValb%,ByValc%)

'SPACEIf

【?】

Thenm=a

Else

m=b

EndIf

'SPACEIf

【?】

Thenmax=m

Else

max=c

EndIf

EndFunction答案：1).max(max1,73,352)2).a>b

四、程序改錯(cuò)共2題（共計(jì)10分）

第1題'【程序改錯(cuò)】

或

b<a3).m>c

或

c<m'題目：請(qǐng)更正程序中錯(cuò)誤，保證程序最后輸出收效如圖

1所示。'注意：不能增加或刪除程序行，也不能夠夠更正程序結(jié)構(gòu)

'

PrivateSubForm_Click()

DimiAsInteger

Fori=1To7

'FOUNDPrintSpc(7);

'FOUND

Ifi>=1Then

Print"*"

Else

'FOUND

Print"*";Spc(2*(i-1));"*"

EndIf

Nexti

EndSub

答案：1).PrintSpc(7-i);2).Ifi=1Then

或

If1=iThen3).Print"*";Spc(2*(i-1)-1);"*"

第2題'【程序改錯(cuò)】

'題目：該程序的功能是經(jīng)過鍵盤給一維數(shù)組a輸入10個(gè)整數(shù)，爾后將一維數(shù)組的這些數(shù)賦

值給一個(gè)2行5列的二維數(shù)組。最后在一行內(nèi)輸出一維數(shù)組、在兩行內(nèi)輸出二維數(shù)組。不能增加或刪除程序行，也不能夠夠更正程序結(jié)構(gòu)

'

PrivateSubForm_Click()

Dima(10),b(2,5)AsInteger

dimiasinteger,kasinteger,jasinteger

Fori=1To10

a(i)=InputBox("請(qǐng)供應(yīng)10個(gè)整數(shù)給數(shù)組")

a(i)=Val(a(i))

Nexti

k=0

Fori=1To2

Forj=1To5

k=k+1

b(i,j)=a(k)

Nextj

Nexti

PrintTab(10);"數(shù)組a的值"

PrintTab(10);

Fori=1To10

'FOUND

Printa(i)

Nexti

Print

PrintTab(10);"二維數(shù)組b的值是:"

Fori=1To2

PrintTab(10);

Forj=1To5

'FOUND

Printb(j,i);

Nextj

'FOUND

Paintb(i,j)

Nexti

EndSub

答案：1).Printa(i);2).print(i,j)3).Print

五、程序設(shè)計(jì)共2題（共計(jì)20分）

第1題'【程序設(shè)計(jì)】

'題目：(事件)單擊窗體。(響應(yīng))編寫代碼功能如(圖1)。將結(jié)果存入變量Sum中。使用

while...wend語句完成程序

'注意：請(qǐng)?jiān)谥付ǖ氖录?nèi)編寫代碼。

'

答案：

DimiAsInteger

i=1

whilei<=10

sum=sum+i^i

i=i+1

wend

Printsum

第2題'【程序設(shè)計(jì)】

'題目：(事件)雙擊窗體。(響應(yīng))把一元鈔票換成一分、二分和五分的硬幣（每種最少有一枚），

求出其全部的換法，把結(jié)果輸出在窗體上。將全部的換法的數(shù)目存入變量N中

'注意：請(qǐng)?jiān)谥付ǖ氖录?nèi)編寫代碼。

'

答案：

Dimi,j,kAsInteger

Fori=1To100

Forj=1To50

Fork=1To20

If((i+2*j+k*5)=100)Then

Print(CStr(i))

Print(CStr(j))

Print(CStr(k))

n=n+1

EndIf

Next

Next

Next

六、VB窗體設(shè)計(jì)共4題（共計(jì)20分）

第1題【窗體設(shè)計(jì)】

題目：請(qǐng)依照題目要求設(shè)計(jì)指定的窗體。建立如

(圖1)所示界面。

1：增加控件在窗體內(nèi)增加3個(gè)文本框(Text1，Text2，Text3)，

3個(gè)標(biāo)簽(Label1，Label2，Label3)，

2個(gè)水平轉(zhuǎn)動(dòng)條(HScroll1，HScroll2)。

2：窗體設(shè)置：

設(shè)置窗體名稱(Name)為“Form6”。

設(shè)置窗體標(biāo)題(Caption)為“VB上機(jī)試卷”。

3：文本框設(shè)置：

在第1個(gè)文本框(Text1)中輸入文本(Text)“顏色彩節(jié)”，

設(shè)置文本的對(duì)齊方式為“居右對(duì)齊”。

設(shè)置第2個(gè)文本框(Text2)的內(nèi)容為空。

設(shè)置第3個(gè)文本框(Text3)的內(nèi)容為空。

全部文本框的字體、字號(hào)可任選。

4：標(biāo)簽設(shè)置：

設(shè)置第1個(gè)標(biāo)簽(Label1)標(biāo)題(Caption)為“文本框的前景色”。

設(shè)置第2個(gè)標(biāo)簽(Label2)標(biāo)題(Caption)為“文本框的背景色”。

設(shè)置第3個(gè)標(biāo)簽(Label3)標(biāo)題(Caption)為“當(dāng)前值”。

5：轉(zhuǎn)動(dòng)條設(shè)置：適合調(diào)整水平轉(zhuǎn)動(dòng)條的大小和地址。

第2題【窗體設(shè)計(jì)】

題目：請(qǐng)依照題目要求設(shè)計(jì)指定的窗體。建立如

(圖1)所示界面。

1：增加控件

增加菜單，名稱為menu_File，名稱為menu_Set。

在menu_Set下增加2個(gè)子菜單，名稱為menu_Set_Back和menu_Set_Fore。

在menu_Set_Back下增加3個(gè)子菜單名稱為menu_Set_Back_Red，

menu_Set_Back_Green，menu_Set_Back_Blue)。

2：窗體設(shè)置

窗體名稱(Name)為“Form4”。

窗體標(biāo)題(Caption)為“VB”。

3：菜單設(shè)置

設(shè)置菜單(menu_File)的標(biāo)題(Caption)為“文件(&F)”，并將菜單項(xiàng)設(shè)為

“無效”。

設(shè)置菜單(menu_Set)的標(biāo)題(Caption)為“設(shè)置(&S)”。

設(shè)置菜單(menu_Set)下的菜單(menu_Set_Back)的標(biāo)題(Caption)為“背景色”。設(shè)置菜單(menu_Set)下的菜單(menu_Set_Fore)的標(biāo)題(Caption)為“前景色”。設(shè)置菜單(menu_Set_Back)下的菜單(menu_Set_Back_Red)的標(biāo)題(Caption)

為“紅”，快捷鍵為Ctrl+A。

設(shè)置菜單(menu_Set_Back)下的菜單(menu_Set_Back_Green)的標(biāo)題(Caption)為“綠”，快捷鍵為Ctrl+B。

設(shè)置菜單(menu_Set_Back)下的菜單(menu_Set_Back_Blue)的標(biāo)題(Caption)為“藍(lán)”，快捷鍵為Ctrl+C。

第3題【窗體設(shè)計(jì)】

題目：請(qǐng)依照題目要求設(shè)計(jì)指定的窗體。建立如

(圖1)所示界面。

1：在窗體內(nèi)增加1個(gè)文本框(Text1)，3個(gè)標(biāo)簽(Label1，Label2，Label3)，3個(gè)按鈕(Command1，Command2，Command3)，1個(gè)組合框(Combo1)。

2：窗體設(shè)置：

設(shè)置窗體名稱(Name)為“Form9”。

設(shè)置窗體標(biāo)題(Caption)為“VB”。

3：標(biāo)簽設(shè)置：

設(shè)置第1個(gè)標(biāo)簽(Label1)的標(biāo)題(Caption)為“人員登記表”。

設(shè)置第2個(gè)標(biāo)簽(Label2)的標(biāo)題(Caption)為“姓名:”。

設(shè)置第3個(gè)標(biāo)簽(Label3)的標(biāo)題(Caption)為“性別:”。

標(biāo)簽中的字體、字號(hào)可隨意選擇。

4：組合框設(shè)置：

適合設(shè)置組合框的大小和地址。

5：文本框設(shè)置：

設(shè)置文本框(Text1)的內(nèi)容(Text)為空。

6：按鈕設(shè)置：

設(shè)置第1個(gè)按鈕(Command1)的標(biāo)題(Caption)為“增加”。

設(shè)置第2個(gè)按鈕(Command2)的標(biāo)題(Caption)為“取消”。

設(shè)置第3個(gè)按鈕(Command3)的標(biāo)題(Caption)為“退出”。

第4題【窗體設(shè)計(jì)】

題目：請(qǐng)依照題目要求設(shè)計(jì)指定的窗體。建立如(圖1)所示界面：請(qǐng)按所給窗體的樣子設(shè)計(jì)

窗體（不要求控件的尺寸相同，運(yùn)行時(shí)獲得所給窗體即可，有時(shí)需要簡(jiǎn)單的事件過程）。

1：在窗體內(nèi)增加2個(gè)按鈕(Command1，Command2)，3個(gè)列表框(List1，List2，List3)，3個(gè)標(biāo)簽(Label1，Label2，Label3)，2個(gè)框架(Frame1，F(xiàn)rame2)，3個(gè)文本框(Text1，Text2，Text3)。

并在框架(Frame1)中增加1個(gè)復(fù)選框(Check1)，1個(gè)組合

框(Combo1)，1個(gè)標(biāo)簽(Label4)。

在框架(Frame2)中增加1個(gè)標(biāo)簽(Label5)。

2：窗體設(shè)置：

設(shè)置窗體名稱(Name)為“Form30”。

設(shè)置窗體標(biāo)題(Caption)為“字體”。

3：標(biāo)簽設(shè)置：

設(shè)置第1個(gè)標(biāo)簽(Label1)的標(biāo)題(Caption)為“字體(&F):”。

設(shè)置第2個(gè)標(biāo)簽(Label2)的標(biāo)題(Caption)為“字型(&Y):”。

設(shè)置第3個(gè)標(biāo)簽(Label3)的標(biāo)題(Caption)為“字號(hào)(&S):”。

4：文本框設(shè)置：

設(shè)置第1個(gè)文本框(Text1)的文本(Text)為“宋體”。

設(shè)置第2個(gè)文本框(Text2)的文本(Text)為“粗體”。

設(shè)置第3個(gè)文本框(Text3)的文本(Text)為“五號(hào)”。

5：列表框設(shè)置：

在第1個(gè)列表框(List1)中輸入文本“黑體”，“宋體”，“隸書”，“幼圓”。

在第2個(gè)列表框(List2)中輸入文本“規(guī)則”，“斜體”，“粗體”，“粗斜體”。

在第3個(gè)列表框(List3)中輸入文本“一號(hào)”，“二號(hào)”，“三號(hào)”，“四號(hào)”，“五號(hào)”。

6：按鈕設(shè)置：

設(shè)置第1個(gè)按鈕(Command1)的標(biāo)題(Caption)為“確定”。

設(shè)置第2個(gè)按鈕(Command2)的標(biāo)題(Caption)為“取消”。

7：框架設(shè)置：

設(shè)置第1個(gè)框架(Frame1)的標(biāo)題(Caption)為“特特收效”。

設(shè)置第1個(gè)框架(Frame1)中的復(fù)選框(Check1)的標(biāo)題(Caption)為“下劃線(&U)”。

設(shè)置第1個(gè)框架(Frame1)中的標(biāo)簽(Label4)的標(biāo)題(Caption)為“顏色(&C):”。

適合調(diào)整第1個(gè)框架(Frame1)中的組合框(Combo1)的大小和地址。

設(shè)置第2個(gè)框架(Frame2)的標(biāo)題(Caption)為“示范”。

設(shè)置第2個(gè)框架(Frame2)中的標(biāo)簽(Label5)的標(biāo)題(Caption)為“中文字體AaBbCc”。

試卷編號(hào)：8108

一、判斷共20題（共計(jì)20分）第1題VB經(jīng)過窗體管理組成應(yīng)用程序的各樣文件的會(huì)集.答案：N第2題若是一個(gè)列表框一共有5個(gè)選項(xiàng),而當(dāng)選中第三項(xiàng)時(shí),這時(shí)列表框的ListIndex屬性為2.Y第3題用VB6.0僅能開發(fā)擁有窗口菜單的應(yīng)用程序,開發(fā)的應(yīng)用中不能夠支持彈出式菜單.答：N第4題直線控件能夠在窗體上拖動(dòng),因此它擁有MOVE方法.答案：N第5題列表框包括了組合框的功能.答案：N第6題在表達(dá)式中,運(yùn)算符兩端的數(shù)據(jù)種類要求一致.答案：Y第7題能夠利用鍵盤光標(biāo)選擇菜單項(xiàng),因此可響應(yīng)KeyPress事件.答案：N第8題在盤驅(qū)動(dòng)器列表框Drive1的Change事件過程中,代碼Dir1.Path=Drive1.Drive的作用是:當(dāng)Drive1的驅(qū)動(dòng)器改變時(shí),Dir1的目錄列表隨不相同驅(qū)動(dòng)器的作相應(yīng)改變.答案：Y第9題VB規(guī)定窗體文件的擴(kuò)展名是.vbp.答案：N第10題在Sub過程中,能夠用Return語句退出Sub過程.答案：Y

第11題VB若同一個(gè)工程有好多窗體,能夠指定任一窗體為啟始窗體.答案：Y第12題列表框的中的項(xiàng)目不能夠夠多列顯示.答案：N第13題準(zhǔn)時(shí)將文本框中的數(shù)據(jù)保留到磁盤,應(yīng)用于采用Timer計(jì)時(shí)器控件.答案：Y第14題由VisualBasic語言編寫的應(yīng)用程序有講解和編譯兩種執(zhí)行方式.答案：Y第15題對(duì)象是基本的運(yùn)行實(shí)體,它既包括了數(shù)據(jù)(屬性).也包括作用于對(duì)象的操作(方法)和對(duì)象的響應(yīng)動(dòng)作(事件).答案：Y

第16題在VB中將一些通用的過程和函數(shù)編寫好并封裝作為方法供用戶直接調(diào)用.答案：Y第17題除去list1列表框?qū)ο蟮膬?nèi)容的語句是list1.cls.答案：N第18題由變量名對(duì)變量的內(nèi)容進(jìn)執(zhí)行用或更正,則使用變量就是引用變量的內(nèi)容.答案：Y第19題在VisualBasic中Dima,b,casinteger和Dimaasinteger,basinteger,casinteger相同.答案：N第20題在VB6.0中,若是要使窗體上的多個(gè)控件擁有相同的尺寸,在選擇了這些控件此后,應(yīng)執(zhí)行VB"格式"菜單中的命令.答案：Y二、單項(xiàng)選擇共20題（共計(jì)20分）第1題能夠獲得一個(gè)文本框中被采用文本的內(nèi)容的屬性是().A:TextB:LengthC:SelTextD:SelStart答案：C第2題計(jì)時(shí)器的interval屬性為0時(shí),表示().A:計(jì)時(shí)器無效B:相隔0秒C:相隔0毫秒

D:計(jì)時(shí)器的

enable屬性為

false答案：

A第3題以下關(guān)于屬性設(shè)置的表達(dá)錯(cuò)誤的選項(xiàng)是

().一個(gè)控件擁有什么屬性是VB起初設(shè)計(jì)好的,用戶不能夠改變B:一個(gè)控件擁有什么屬性是VB起初設(shè)計(jì)好的,用戶能夠改變

C:一個(gè)控件的屬性即能夠在屬性窗口中設(shè)置,也能夠用程序代碼設(shè)置

D:一個(gè)控件的屬性在屬性窗口中設(shè)置,還可以夠利用程序代碼為其設(shè)置新值

第4題要使一個(gè)文本框擁有水平和垂直轉(zhuǎn)動(dòng)條,則應(yīng)先將其MultiLine

答案：A屬性設(shè)置為

True,爾后

再將ScrollBar屬性設(shè)置為().

A:0B:1C:2D:3答案：D

第5題已知A?B?C中C最小,則判斷A?B?C能否組成三角形三條邊長(zhǎng)的邏輯表達(dá)式是().

A:A>=BAndB>=CAndC>0B:A+C>BAndB+C>AAndC>0

C:(A+C)>=CAndA-C<=C)AndC>0D:A+B>CAndA-B>CAndC>0答案：B

第6題用語句DimA(-3To5)AsInteger定義的數(shù)組的元素個(gè)數(shù)是().

A:6B:7C:8D:9答案：D

第7題若是TAB函數(shù)的參數(shù)小于1,則打印地址在第()列.

A:0B:1C:2D:3答案：B

第8題錢幣型數(shù)據(jù)需()字節(jié).

A:2B:4C:6D:8答案：D

第9題在程序代碼中更正轉(zhuǎn)動(dòng)條的value屬性時(shí)將激發(fā)轉(zhuǎn)動(dòng)條的()事件.

A:changeB:scrollC:dragdropD:gotfocus答案：A

第10題在中斷狀態(tài)下能夠運(yùn)行代碼,也能夠在運(yùn)行狀態(tài)中作為輸出結(jié)果的窗口稱為().

A:當(dāng)?shù)卮翱贐:馬上窗口C:觀察窗口D:棧窗口答案：B

第11題文本框控件中將Text的內(nèi)容全部顯示為所定義的字符的屬性項(xiàng)是().

A:PasswordCharB:需要編程來實(shí)現(xiàn)C:PasswordD:以上都不是答案：A

第12題下面()控件不擁有Caption屬性.

A:標(biāo)簽框B:單項(xiàng)選擇鈕C:命令按鈕D:文本框答案：D

第13題Rnd函數(shù)不能能產(chǎn)生的()值.

A:0B:1C:0.1234D:.00005答案：B

第14題若是X是一個(gè)正的實(shí)數(shù),將千分位四舍五入,保留兩位小數(shù)的表達(dá)式是().

A:0.01*int(x+0.05)B:0.01*int(100*(x+0.005))

C:0.01*int(100*(x+0.05))D:0.01*int(x+0.005)答案：B

第15題OPTIONEXPLICIT語句不能夠夠放在().

A:窗體模塊的聲明段中B:標(biāo)準(zhǔn)模塊的聲明段中C:類模塊的聲明段中D:任何事件過程中D

第16題以下各項(xiàng)變量中,哪一項(xiàng)所占的內(nèi)存空間最多().

A:dimxascurrencyx=99B:dimst1asstringst1='good'

C:dimst2asstringst2='goodbye'D:dimdasdatad='1898/09/12'答案：C

第17題骰子是一個(gè)正六面體,分別用1~6代表這六個(gè)面,擲一次骰子出現(xiàn)的數(shù)可表示為().A:int(rnd*6+1)B:int(rnd*6)C:int(rnd*7)D:int(rnd(6)+1)答案：A第18題為了在按下回車鍵時(shí)執(zhí)行某個(gè)命令按鈕的事件過程,需要把該命令按鈕的一個(gè)屬性設(shè)置為True,這個(gè)屬性是().A:ValueB:DefaultC:CancelD:Enabled答案：B第19題設(shè)在窗體上有兩個(gè)命令按鈕,其中一個(gè)命令按鈕的名稱為cmda,則另一個(gè)命令按鈕的名稱不能夠是().A:cmdcB:cmdbC:cmdAD:Command1答案：C第20題以下對(duì)變量的定義中,不能夠定義A為變體變量的是().A:DIMAASDOUBLEB:DIMAASVARIANTC:DIM;AD:A=24答案：A三、程序填空共2題（共計(jì)10分）第1題'【程序填空】'題目：以下程序的功能如(圖1)。'PrivateSubForm_Click()Dima%,b%,c%,d!Dimx1,x2Dimp,q,ra=InputBox("請(qǐng)輸入a的值")b=InputBox("請(qǐng)輸入b的值")

c=InputBox("請(qǐng)輸入c的值")

d=b*b-4*a*c

p=-b/(2*a)

Ifd>=0Then

'SPACE

If【?】Then

r=Sqr(d)/(2*a)

x1=p+r

x2=p-r

Else

x1=p

x2=p

'SPACE

?】

Print"x1=";x1,"x2=";x2

'SPACE

?】

q=Sqr(-d)/(2*a)

Print"x1=";p;"+";q;"i","x2=";p;"-";q;"i"

EndIf

EndSub

答案：1).d>0或0<d2).EndIf3).Else

第2題'【程序填空】

'下面過程max()用于求3個(gè)數(shù)中最大值，利用這個(gè)過程求5個(gè)數(shù)中最大值。

'

PrivateSubForm_Click()

Print"5個(gè)數(shù)34、124、68、73、352的最大值是："

max1=max(34,124,68)

'SPACE

max1=【?】

Printmax1

EndSub

PublicFunctionmax(ByVala%,ByValb%,ByValc%)

'SPACE

If【?】Then

m=a

Else

m=b

EndIf

'SPACE

If【?】Then

max=m

Else

max=c

EndIf

EndFunction

答案：

1).max(max1,73,352)2).a>b

或

b<a3).m>c

或

c<m

四、程序改錯(cuò)

共

2

題（共計(jì)

10分）

第1題

'【程序改錯(cuò)】

'題目：以下程序功能是輸入三個(gè)數(shù)，由大到小排序。

'注意：不能增加或刪除程序行，也不能夠夠更正程序結(jié)構(gòu)

'

DimAAsInteger

DimBAsInteger

DimCAsInteger

PrivateSubForm_Click()

DimnTempAsInteger

A=Val(InputBox("Pleaseinputfirstinteger","

輸入正整數(shù)

"))

B=Val(InputBox("Pleaseinputsecondinteger","

輸入正整數(shù)

"))

C=Val(InputBox("Pleaseinputthirdinteger","

輸入正整數(shù)

"))

'FOUND

IfA<=CThen

nTemp=A

A=B

B=nTemp

EndIf

'FOUND

IfB<=CThen

nTemp=A

A=C

C=nTemp

EndIf

'FOUND

IfA<=BThen

nTemp=B

B=C

C=nTemp

EndIf

Print"Theintegersinorderis";A;B;C

EndSub

答案：1).IfA<=BThen或IfB>=AThen

2).IfA<=CThen或IfC>=AThen

3).IfB<=CThen或IfC>=BThen

第2題'【程序改錯(cuò)】

'題目:輸入一個(gè)字符串，將全部的小寫字母都變換為大寫字母。

'注意：不能增加或刪除程序行，也不能夠夠更正程序結(jié)構(gòu)

'

PrivateSubForm_Click()

Dims1AsString,s2AsString,iAsInteger,tAsString

s1=InputBox("輸入字符串，#號(hào)結(jié)束")

i=1

'FOUND

s1=Mid(s1,i,1)

Whilet<>"#"

'FOUND

Ift>="a"Andt<="z"Thent=Chr(Asc(t)-30)

s2=s2+t

i=i+1

t=Mid(s1,i,1)

Wend

'FOUND

Print"新字符串為：";s1

EndSub

答案：1).t=Mid(s1,i,1)

2).Ift>="a"Andt<="z"Thent=Chr(Asc(t)-32)

3).Print"新字符串為:";s2

五、程序設(shè)計(jì)共2題（共計(jì)20分）

第1題'【程序設(shè)計(jì)】

'題目：(事件)雙擊窗體。

(響應(yīng))求1+5+10+15++500的和，并將結(jié)果輸出到窗體上。將結(jié)果存入變量SUM中。

'注意：請(qǐng)?jiān)谥付ǖ氖录?nèi)編寫代碼。

'

答案：

DimiAsInteger

Fori=1To500

IfiMod5=0Then

sum=sum+i

EndIf

Next

Printsum

第2題'【程序設(shè)計(jì)】

'題目：(事件)單擊窗體。(響應(yīng))求100以內(nèi)偶數(shù)的和，并將結(jié)果輸出在窗體上。將結(jié)果存入變量SUM中

'注意：請(qǐng)?jiān)谥付ǖ氖录?nèi)編寫代碼。

'

答案：

DimiAsInteger

Fori=1To100

IfiMod2=0Then

sum=sum+i

EndIf

Next

Printsum

六、VB窗體設(shè)計(jì)共4題（共計(jì)20分）

第1題【窗體設(shè)計(jì)】

題目：請(qǐng)依照題目要求設(shè)計(jì)指定的窗體。建立如(圖1)所示界面：請(qǐng)按所給窗體的樣子設(shè)

計(jì)窗體，不要求控件的尺寸相同，運(yùn)行時(shí)獲得所給窗體即可，有時(shí)需要簡(jiǎn)單的事件過程。

1：在窗體內(nèi)增加2個(gè)按鈕(Command1，Command2)，3個(gè)組合框(Combo1，

Combo2，Combo3)，1個(gè)文本框(Text1)，6個(gè)標(biāo)簽(Label1，Label2，

Label3，Label4，Label5，Label6)，2個(gè)復(fù)選框(Check1，Check2)。

2：窗體設(shè)置：

設(shè)置窗體名稱(Name)為“Form22”。

設(shè)置窗體標(biāo)題(Caption)為“字體”。

3：標(biāo)簽設(shè)置：設(shè)置第1個(gè)標(biāo)簽(Label1)的標(biāo)題(Caption)為“字體”。設(shè)置第2個(gè)標(biāo)簽(Label2)的標(biāo)題(Caption)為“字符間距”。設(shè)置第3個(gè)標(biāo)簽(Label3)的標(biāo)題(Caption)為“文字收效”。設(shè)置第4個(gè)標(biāo)簽(Label4)的標(biāo)題(Caption)為“縮放”。設(shè)置第5個(gè)標(biāo)簽(Label5)的標(biāo)題(Caption)為“間距”。設(shè)置第6個(gè)標(biāo)簽(Label6)的標(biāo)題(Caption)為“地址”。

4：文本框設(shè)置：

在文本框(Text1)中輸入文本(Text)“12?！?/p>

5：組合框設(shè)置：

設(shè)置組合框(Combo1)的文本(Text)為“75%”。

設(shè)置組合框(Combo2)的文本(Text)為“加寬”。

設(shè)置組合框(Combo3)的文本(Text)為“提升”。

6：復(fù)選框設(shè)置：

設(shè)置第1個(gè)復(fù)選框(Check1)的標(biāo)題(Caption)為“調(diào)整字體的字間距”。

設(shè)置第2個(gè)復(fù)選框(Check2)的標(biāo)題(Caption)為“若是定義了網(wǎng)格,則對(duì)齊網(wǎng)格”。

兩個(gè)復(fù)選框均為選中狀態(tài)。

7：按鈕設(shè)置：

設(shè)置按鈕(Command1)的標(biāo)題(caption)為“確