【正文】 3)+chr(10)Loop【15】End Sub答案： +a(I,j) 0 = S(Rnd*99)(i)mod 5=0(S1)=7 (j)imax(i)=ia(imax) 1三 tEnd Sub ，并編寫(xiě)如下程序：Private Sub Command1_Click()X =InputBox(x)If x^2If x^29 Then y= x^2+1If(x^2)7=9 Then y=xPrint “y=”amp。yEnd SubPrivate Sub Value(ByVal m As Integer, n As Integer)m=m*2：ｎ=n5End Sub程序運(yùn)行后，單擊命令按鈕，寫(xiě)出程序的輸出結(jié)果。答案：Private Sub Form1_Click()Dim s%,c%For i=1 to 100If i Mod 5=0 And i Mod 7=0Thens = s+1c = c +iEnd IfNext iPrint s, cEnd Sub第二篇：vb選擇題及答案（）。(A)VB是可視化程序設(shè)計(jì)語(yǔ)言(B)VB采用事件驅(qū)動(dòng)編程機(jī)制(C)VB是面向過(guò)程的程序設(shè)計(jì)語(yǔ)言(D)VB應(yīng)用程序可以以編譯方式執(zhí)行(答案：C)（）。(A)x_y(B)xy(C)2x(D)and(答案：A)（）為單精度變量。(A)x%y(B)xy%(C)2x(D)Or(答案：B)（）作為界定符。(A)2 3(B)2 / 3(C)2 mod 3(D)3 mod 2(答案：C)，優(yōu)先級(jí)最低的是（）。(A)x Mod 2 0(B)x Mod 2!= 0(C)x Mod 2 ≠ 0(D)x Mod 2 ＝ 0(答案：A)（）。(A)0(B)1(C)1(D)出錯(cuò)(答案：A)(x)的值為1，整型變量x的值是（）。y。(A)80 50 30(B)80 30 30(C)50 30 80(D)50 30 30(答案：B)，x的值是（）。(A)6(B)9(C)10(D)16(答案：C)（）。Dim m%, n% For m = 1 To 3 For n = 1 To 6 Step 2 n = n + 1 Print n Next Next(A)3(B)6(C)9(D)18(答案：B) Base 1語(yǔ)句，則數(shù)組a包含（）個(gè)元素。A、.frx B、.basC、.vbp D、.frm 2．以下4個(gè)選項(xiàng)中，屬性窗口未包含的是。A、F2B、F5 C、Alt+F3D、F8 6．改變控件在窗體中的上下位置應(yīng)修改該控件的屬性。A、5B、9 C、12D、16 10．在Visual Basic中，稱(chēng)對(duì)象的數(shù)據(jù)為。A、275 B、2151C、216D、2161 2．貨幣類(lèi)型數(shù)據(jù)小數(shù)點(diǎn)后面的有效位數(shù)最多只有。A、[0，100]B、[1，99]C、[0，99]D、[1，100] 6．下列程序段的輸出結(jié)果是。A、DateB、MonthC、TimeD、Now ”5*5“ 的顯示結(jié)果是。A、只能是變量名 B、可以是整型 C、可以是字符型 D、可以是浮點(diǎn)類(lèi)型 2．下列關(guān)于Select Case的敘述中，錯(cuò)誤的是。A、4 B、5 C、6 D、0 6．窗體通用部分的語(yǔ)句“OptionBase 1”，決定本窗體中數(shù)組下標(biāo)界。A、TextB、Caption C、LeftD、Name 4．將焦點(diǎn)主動(dòng)設(shè)置到指定的控件或窗體上，應(yīng)采用方法。A、EnabledB、Locked C、VisibleD、MultiLine 8．要使文本框顯示滾動(dòng)條，除了設(shè)置ScrollBars屬性外還必須設(shè)置屬性。A、TrueB、FalseC、0D、1 12．要使復(fù)選框控件不響應(yīng)Click事件，可設(shè)置復(fù)選框的屬性。A、方法 B、對(duì)象 C、屬性 D、事件16．以下語(yǔ)句將刪除列表框List1中的最后一項(xiàng)。A、KeyDown B、Change C、ScrollD、Click 20．設(shè)計(jì)動(dòng)畫(huà)時(shí)通常用定時(shí)器控件屬性來(lái)控制動(dòng)畫(huà)速度。A、DrawStyle屬性 B、Cls方法 C、ScaleMode屬性 D、DrawWidth屬性 4．Visual Basic用以下哪一條指令來(lái)繪制直線(xiàn)。A、Circle方法B、Pset方法 C、Line屬性 D、Point屬性8．描述以（1000，1000）為圓心、以400為半徑畫(huà)1/4圓弧的語(yǔ)句，以下正確的是。A、橢圓的縱軸和橫軸長(zhǎng)度比 B、橢圓的橫軸和縱軸長(zhǎng)度比 C、同心圓的半徑比 D、圓弧兩半徑間的夾角 12．RGB函數(shù)中的3個(gè)數(shù)字分別表示。A、框架 B、圖片框 C、影像框D、窗體第三篇：VB試題及答案VB試題及答案一、基本概念及基本操作如果要向工具箱中加入控件和部件，可以利用“工程”菜單中的______命令。A、工程資源管理器窗口 B、工具箱窗口 C、代碼窗口 D、屬性窗口以下敘述中錯(cuò)誤的是______。A、VBP B、FRM C、VBW D、PDM以下敘述中錯(cuò)誤的是______。為了保存該應(yīng)用程序，以下正確的操作是。A、語(yǔ)法錯(cuò)誤 B、編譯錯(cuò)誤 C、運(yùn)行錯(cuò)誤 D、邏輯錯(cuò)誤1Microsoft Visual Basic ，其中不包括______。A、一個(gè)Visual Basic應(yīng)用程序可以含有多個(gè)標(biāo)準(zhǔn)模塊文件 B、一個(gè)Visual Basic工程可以含有多個(gè)窗體文件 C、標(biāo)準(zhǔn)模塊文件可以屬于某個(gè)指定的窗體文件 D、1以下敘述中錯(cuò)誤的是______。D A、Caption B、Name C、Font D、Text 。B A、匯編程序 B、編譯程序 C、解釋程序以上皆可。D A、對(duì)象，屬性，事件，方法 B、對(duì)象，屬性，方法，事件 C、屬性，對(duì)象，方法，事件 D、屬性，對(duì)象，事件，方法 A、data$B、time$C、date$D、gettime$ ―控件‖的方法正確的是（）B A、單擊控件圖標(biāo)，將指針移到窗體上，雙擊鼠標(biāo) B、雙擊工具箱中的控件，即在窗體上出現(xiàn)該控件 C、單擊工具箱中的控件，將指針移到窗體上，再單擊 D、用鼠標(biāo)左鍵拖動(dòng)工具箱中的某控件到窗體的適當(dāng)位置 ，Visual Basic將顯示的窗口是C A、項(xiàng)目（工程）窗口B、工具箱C、代碼窗口D、屬性窗口 …next 語(yǔ)句的說(shuō)法正確的是（）A A、循環(huán)變量、初值、終值和步長(zhǎng)都必須為數(shù)值型 B、step后的步長(zhǎng)只為正數(shù) C、初值必須小于終值 D、初值必須大于終值，整個(gè)工程以_____（工程文件）儲(chǔ)存。B、存放人名、地址等文字信息。方法ShowColor , 顯示____對(duì)話(huà)框。B A、Left B、Top C、Width D、Name 。C A、順序結(jié)構(gòu) B、循環(huán)結(jié)構(gòu) C、直線(xiàn)型結(jié)構(gòu) D、分支結(jié)構(gòu) ，M≠6應(yīng)寫(xiě)成： C A、M6 B、M≠6 C、M6 D、NOT M6 ―數(shù)據(jù)類(lèi)型保留字‖是。B A、算術(shù)平方根函數(shù) B、絕對(duì)值函數(shù)C、正弦三角函數(shù) D、字符串轉(zhuǎn)換為數(shù)值函數(shù) 。C 32*b OR a=c AND b c OR cd A、1 B、True C、False D、–1 49．設(shè)置標(biāo)簽中顯示內(nèi)容的屬性是。界面如下：當(dāng)用戶(hù)輸入N后，單擊―計(jì)算‖按鈕，則輸出1＋2＋3＋…+N的和。程序運(yùn)行后，用戶(hù)按開(kāi)始按鈕，則開(kāi)始計(jì)時(shí)，文本框中顯示秒數(shù)，接停止按鈕，則計(jì)時(shí)停止。 “秒” 54．編制一個(gè)能在窗體中畫(huà)出由用戶(hù)指定圓心位置和半徑大小的圓的程序,要求單擊―繪圓‖按鈕時(shí)繪圓，單擊―清除‖按鈕時(shí)清除繪圖區(qū)中的圖形及文本框中的內(nèi)容。D、對(duì)象原來(lái)就包含的內(nèi)部函數(shù)或程序。D A、— B、+ C、AND D、18．下列控件中可用于接受用戶(hù)輸入文本，又可用于顯示文本的是（）B A、Label 控件 B、TextBox 控件 C、Timer 控件 D、CommandButton 控件 19．以下程序段執(zhí)行后整型變量度n 的值為（）B n=0 for L=1 to 20 step 5 n=n+L next L A、50 B、34 C、15 D、210 20．如果要改變窗體的標(biāo)題,需要設(shè)置窗體對(duì)象的_____屬性。D A、存放需要計(jì)算的數(shù)字。28． 通過(guò)執(zhí)行通用對(duì)話(huà)框的方法，可以將其表示為不同的對(duì)話(huà)框。B A、保存文件 B、字體 C、打開(kāi)文件 D、顏色30．計(jì)時(shí)器的Interval屬性是用來(lái)設(shè)置一時(shí)間間隔，單位是_____。A A、Left B、Top C、Width D、Name 35．計(jì)算數(shù)x的算術(shù)平方根的函數(shù)是___。B A、FOR語(yǔ)句中可省略STEP及步長(zhǎng)值,默認(rèn)步長(zhǎng)值為1 B、循環(huán)變量只能用數(shù)值簡(jiǎn)單變量 C、步長(zhǎng)值可正可負(fù)D、初值、終值、步長(zhǎng)值可以是數(shù)值表達(dá)式45．,所使用的語(yǔ)句為。C A、被選中 B、出現(xiàn)在窗體左上角 C、出現(xiàn)在窗體中部 D、沒(méi)變化，需要把它的一個(gè)屬性設(shè)置為False，這個(gè)屬性是。參考答案：Private Sub Command1_Click()Dim a, b As Integer a = Val()b = Val()If a = b Then = a Else = b End If End Sub ，計(jì)算1*2+2*3+3*4+4*5+…+N*（N+1）的和。A A、integer B、long C、single D、string 39．在VB中數(shù)據(jù)類(lèi)型為雙精度浮點(diǎn)型的―數(shù)據(jù)類(lèi)型保留字‖是。A A、()→函數(shù)→乘方→* /→+ C、函數(shù)→乘方→()→* /→+43． 表達(dá)式4+5 6 * 7 / 8 Mod 9 的值是。C A、pset B、line C、cls D、move 47．VB中工程文件的擴(kuò)展名為。D A、PictureBox B、CommandButton C、Timer D、CommonDialog二、程序設(shè)計(jì)題51．設(shè)計(jì)一個(gè)程序，輸入一個(gè)長(zhǎng)方體的長(zhǎng)寬高，計(jì)算并輸出其體積V，界面如下： 當(dāng)用戶(hù)輸入長(zhǎng)寬高，后單擊―計(jì)算‖按鈕，則輸出結(jié)果。 x1 amp。Integer、Long、Single、Double是數(shù)值類(lèi)型數(shù)據(jù)，但Byte不是。標(biāo)簽控件可以響應(yīng)Click事件。窗體啟動(dòng)位置可在“窗體布局窗口”中直接設(shè)置。用Function過(guò)程在過(guò)程中必須被賦值。運(yùn)行時(shí)目錄列表框的List屬性可以用AddItem和RemoveItem兩種方法來(lái)改變。如果B是一個(gè)字節(jié)型變量，那么B可以用來(lái)保存數(shù)值1。從幾十個(gè)項(xiàng)目中任選其中一項(xiàng)或多項(xiàng)時(shí)可選用列表框或組合框控件來(lái)實(shí)現(xiàn)。方法是VB預(yù)先定義的、只有用戶(hù)可直接使用的過(guò)程。事件過(guò)程只能由系統(tǒng)調(diào)用，在程序中不能直接調(diào)用。HFFamp。在“工程資源管理器”，可以實(shí)現(xiàn)多窗體的所有操作。定義一個(gè)過(guò)程時(shí)，有幾個(gè)形參，則在調(diào)用該過(guò)程時(shí)就必須提供幾個(gè)實(shí)參。在消息框（MsgBox）中，“Prompt”（消息）是必選項(xiàng)，最大長(zhǎng)度為64個(gè)字符。表達(dá)式543的計(jì)算結(jié)果是True。將組合框的Style屬性設(shè)置為0時(shí)，組合框稱(chēng)為“下拉式組合框”，其選項(xiàng)可以從下拉列表框的 列表項(xiàng)中選擇，也可以由用戶(hù)輸入。決定對(duì)象是否可見(jiàn)的屬性是Show屬性，決定對(duì)象可用性的屬性是Load屬性。Sub過(guò)程名在過(guò)程中必須被賦值。菜單編輯器中的快捷鍵是指無(wú)須打開(kāi)菜單就可以直接由鍵盤(pán)輸入選擇菜單項(xiàng)的鍵。Print語(yǔ)句可以省略輸出項(xiàng)，省略輸出項(xiàng)，表示輸出一空行。設(shè)置窗體的Fillcolor屬性使窗體的填充色為紅色后，形狀控件的填充色也是紅色。面向?qū)ο蟪绦蛟O(shè)計(jì)是一種以對(duì)象為基礎(chǔ)，由事件驅(qū)動(dòng)對(duì)象執(zhí)行的設(shè)計(jì)方法。要實(shí)現(xiàn)同樣的循環(huán)控制，在Do While/ Loop和Do/ Loop While循環(huán)結(jié)構(gòu)中給定的循環(huán)條件是一 樣的。CommonDialog控件就像Timer控件一樣，在運(yùn)行時(shí)是看不見(jiàn)的。整除運(yùn)算符，其兩邊的操作數(shù)可以是浮點(diǎn)型數(shù)據(jù)。；運(yùn)行時(shí)，可以通過(guò)按alt+ Y鍵執(zhí)行單擊操作。由Visual Basic語(yǔ)言編寫(xiě)的應(yīng)用程序有解釋和編譯兩種執(zhí)行方式。因?yàn)镕unction過(guò)程有返回值，所以只能在表達(dá)式中調(diào)用，而不能使用Call語(yǔ)句調(diào)用。菜單一旦建成后，所有的菜單項(xiàng)均可識(shí)別Click事件。過(guò)程級(jí)變量不可以與模塊級(jí)變量同名。執(zhí)行滾動(dòng)條控件的Change事件不是在拖動(dòng)滾動(dòng)條滑塊的過(guò)程中，而是在拖動(dòng)過(guò)程停止時(shí)。在VB中，對(duì)象的數(shù)據(jù)被稱(chēng)為屬性。數(shù)組作為參數(shù)，傳遞的是地址數(shù)據(jù)。在通用對(duì)話(huà)框的“打開(kāi)文件對(duì)話(huà)框”中選擇一個(gè)文件后，能真正打開(kāi)該文件。內(nèi)部函數(shù)是系統(tǒng)預(yù)定義的函數(shù)。定時(shí)器控件只能響應(yīng)Timer事件。在VB中如要使用調(diào)試工具，應(yīng)使VB進(jìn)入中斷模式。For/Next語(yǔ)句中，“Step 1”可以缺省。通用對(duì)話(huà)框的Filename和FileTitle屬性一樣，指的都是含路徑的文件全名。Val是用來(lái)把一個(gè)數(shù)字字符串轉(zhuǎn)換為相應(yīng)的數(shù)值的函數(shù)。影像框和圖片框都可以用AutoSize屬性來(lái)控制控件大小調(diào)整的行為，當(dāng)AutoSize屬性值為T(mén)rue 時(shí)，兩者控件大小根據(jù)圖片來(lái)調(diào)整；設(shè)置為False時(shí)，只有一部分圖片可見(jiàn)?？丶膶傩灾挡豢梢栽诔绦蜻\(yùn)行時(shí)動(dòng)態(tài)地修改。用Public聲明的數(shù)組是一定全局量。對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì) 對(duì)錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò) 錯(cuò)B B B A B A B B B B B B B A B B A B B A B A A A A B B A A A B A B B A B B A A B A A A A B B A A B B A 通用對(duì)話(huà)框不是一種標(biāo)準(zhǔn)控件，初始時(shí)工具箱中一般找不到，因此使用前需先將它添加到工具 箱中。表達(dá)式Mid(“Nothing”