【文章內(nèi)容簡介】 (N)End SubPrivate Function Fact(M)Fact= _______________（1分）For I=2 To ____________（2分）Fact = ______________（2分）Next IDim A(10,10)For I=1 To 10For J=_______________（2分）If __ _____________ Then A(I, J)=5 Else A(I, J)=1（1分）Next J Next I For I=1 To 10For J=1 To 10Print A(I, J)。Next J__ __________（2分）Next IEnd Sub編寫一個(gè)程序，在程序運(yùn)行時(shí)輸入一個(gè)0—99999之間的整數(shù)，判斷輸入的是幾位數(shù)，并在窗體輸出結(jié)果。編寫一個(gè)程序，在窗體上添加兩個(gè)命令按鈕，運(yùn)行程序時(shí)，單擊[開始]按鈕，在窗體輸出1~100之間所有能被3整除的數(shù)。單擊[結(jié)束]按鈕，結(jié)束程序。第二篇：VB程序設(shè)計(jì)試題與答案，應(yīng)設(shè)置該標(biāo)簽的()屬性的值(單) (Timer事件)，則其Interval屬性值應(yīng)設(shè)置為()(單) ()對(duì)象支持KeyPress事件(單) ()(單) ()(單)，并設(shè)置好對(duì)象的屬性，系統(tǒng)便可以自動(dòng)生成程序代碼，這稱為()(單) ，工程文件的擴(kuò)展名是()(單)A..frmB..vbpC..basD..frx ，窗體文件的擴(kuò)展名是()(單)A..frm B..vbpC..basD..frx (單)、調(diào)試、運(yùn)行程序，但不能生成可執(zhí)行程序 、生成可執(zhí)行程序、運(yùn)行程序，但不能調(diào)試程序 、調(diào)試、生成可執(zhí)行程序，但不能運(yùn)行程序 、調(diào)試、運(yùn)行程序，也能生成可執(zhí)行程序 “VISUAL”的含義是()(單)()(單) ，在()中編寫代碼(單)，英文縮寫“OOP”的含義是()(單)，則以下正確的屬性設(shè)置語句是()(單)==5=50 =500 15在窗體上畫一個(gè)名稱為Command1的命令按鈕，然后編寫如下事件過程： Private Sub Command1_Click()a$=“VisualBasic” Print String(3,a$)End Sub 程序運(yùn)行后，單擊命令按鈕，在窗體上顯示的內(nèi)容是()(單)，錯(cuò)誤的是()(單),且能清除內(nèi)存中的窗體 ，各窗體的菜單是彼此獨(dú)立的 ，可以根據(jù)需要指定啟動(dòng)窗體 ，單獨(dú)保存每個(gè)窗體 17以下合法的Visual Basic變量的名稱是()(單)x!，它的Value屬性的值是()(單) 5 Mod 3+53的值是()(單)20設(shè)x=4,y=8,z=7, 表達(dá)式：(x＜y)Or z＜x 的值是()(單) 21設(shè)有如下程序段： x=2 For c=1 To 4 Step 2 x=x+c Next c 運(yùn)行以上程序后，x的值是()(單) 22執(zhí)行如下兩條語句，窗體上顯示的是()(單)A= Print Format(a,“”), ,23下列說法中正確的是：為了保存一個(gè)Visual Basic應(yīng)用程序，應(yīng)當(dāng)()(單)(.frm)(.vbp)(.bas)、窗體文件和標(biāo)準(zhǔn)模塊文件，應(yīng)設(shè)置該對(duì)象的()屬性值為True(單) ，其實(shí)現(xiàn)的方法或語句是()(單) ，不是VB標(biāo)準(zhǔn)控件的是()(單) 27在窗體上畫一個(gè)名稱為Command1的命令按鈕，然后編寫如下程序： Dim a As Variant a = Array(1, 2, 3, 4, 5)Sum = 0 For i = 1 To 5 Sum = Sum + a(i1)“, a(i1) x Then Print a(iNum2 Case 3 Op = ”“ Result = Num1 * Num2 Case 4 Op = ”247?！?Result = Num1 / Num2 End Select Label1= Num1 amp。 Op amp。 Num2 amp。 ”=“ amp。 Result End Sub 窗體運(yùn)行后，輸入1，則label1的標(biāo)題顯示結(jié)果為()(單)+2=5 =1 2=6 247。2=42在窗體上畫一個(gè)名稱為Text1的文本框，然后畫一個(gè)名稱為HScroll1的滾動(dòng)條，其Min和Max屬性分別為0和100。程序運(yùn)行后，如果移動(dòng)滾動(dòng)框，則在文本框中顯示滾動(dòng)條的當(dāng)前值，以下能實(shí)現(xiàn)上述操作的程序段是()(單) Sub HScroll_Change()= End Sub Sub HScroll_Click()= End Sub Sub HScroll_Change()= End Sub Sub HScroll_Click()= End Sub，然后編寫如下事件過程： Private Sub Command1_Click()x=InputBox(”Input“)Select Case x Case 1,3 Print ”分支 1“ Case Is＞4 Print ”分支 2“ Case Else Print ”Else 分支 “ End Select End Sub 程序運(yùn)行后，如果在輸入對(duì)話框中輸入2，則窗體上顯示的是（） ～200之間的數(shù)，求它們的最大值程序如下： Private Sub Command1_Click()Max = 100 For i = 1 To 10 x = int【 】 Print x。If x ＞ Max Then Max=x Next i Print Print ”最大值=“。Max End Sub 45設(shè)a=10，b=5，c=1，執(zhí)行語句Print a ＞b ＞ c后，窗體上顯示的是()(單) (46)在窗體上建立通用對(duì)話框需要添加的控件是A)Data控件 B)From控件 C)CommonDialog控件 D)VBComboBox控件(47)在Visual Basic中，要將一個(gè)窗體加載到內(nèi)存進(jìn)行預(yù)處理但不顯示，應(yīng)使用的語句是 A)Load B)Show C)Hide D)Unload48)Sub過程與Function過程最根本的區(qū)別是A)Sub過程可以用Call語句直接使用過程名調(diào)用，而Function過程不可以B)Function過程可以有形參，Sub過程不可以C)Sub過程不能返回值，而Function過程能返回值 D)兩種過程參數(shù)的傳遞方式不同49保存一個(gè)工程至少應(yīng)保存兩個(gè)文件，這兩個(gè)文件分別是）A)文本文件和工程文件 B)窗體文件和工程文件 C)窗體文件和標(biāo)準(zhǔn)模塊文件 D)類模塊文件和工程文件，命令按鈕上并沒有顯示所需的圖形，原因是沒有對(duì)某個(gè)屬性設(shè)置為1，該屬性是A)MousePicture B)Style C)DownPicture D)DisabledPicture51假設(shè)變量bool_x是一個(gè)布爾型(邏輯型)的變量，則下面正確的賦值語句是）A)bool_x=”False“ B)bool_x=.)bool_x=False D)bool_x=False=“中華人民共和國”，表達(dá)式Left（S,1）+Right（S,1）+Mid（S,3,2）的值為（）A)“中華民國”B)“中國人民”C)“中共人民”D)“人民共和” 53下列表達(dá)式的值為2123的是（）A)Val(”123asd“)amp。 2000 B)Val(”123asd“)+ 2000 C)Str(123)amp。 ”2000“ D)Str(123)+”2000“ 54假設(shè)在窗體上建立了一個(gè)通用對(duì)話框，其名稱為CommonDialog1，然后畫一個(gè)命令按鈕Command1,并編寫如下事件過程： Private Sub Command1_Click()=4 =”all files(*.*)|*.*|text Files(*.Txt)|*.txt|Batch Filse(*.bat)|*.bat“ =1 MsgBox End Sub 程序運(yùn)行后，單擊命令按鈕，將顯示一個(gè)“打開”對(duì)話框，此時(shí)在“文件類型”對(duì)話框中顯示的是（）A)All Files(*.*)B)Text Files(*.Txt)C)Batch Files(.bat)D)不確定55當(dāng)運(yùn)行程序時(shí)，系統(tǒng)自動(dòng)執(zhí)行啟動(dòng)窗體的某個(gè)事件過程。這個(gè)事件過程是（）A)Load B)Click C)Unload D)GotFocus ，都具有一個(gè)共同屬性。這個(gè)屬性是（）A)Text B)Font C)Name D)Caption ，語句之間要用某個(gè)符號(hào)分隔。這個(gè)符號(hào)是（）A)，B)；C)、D)： + ”129“ amp。 200的值是A)12329 B)”12129200“ C)”12000129200“ D)”12329“ Basic是一種面向?qū)ο蟮某绦蛟O(shè)計(jì)語言，構(gòu)成對(duì)象的三要素是（）A)屬性、控件和方法 B)屬性、事件和方法 C)窗體、控件和過程 D)控件、過程和模塊60表達(dá)式String(1,”I am student“)+ Replace(”am harass“,”rass“,”ppy“)amp。 ”!“的值是（）A)”I am happy!“ B)”I am student I am s am harass studentam happy!“ C)”I am student am harass!“ D)”I am student am happy!“ （List1）最后一個(gè)數(shù)據(jù)項(xiàng)應(yīng)使用的表達(dá)式是（）A)()B)()C)(ListCount)D)(ListCount1)，可重定義坐標(biāo)系的是）A)DrawStyle屬性 B)DrawWidth屬性 C)Scale方法 D)ScaleMode屬性 ()A)滾動(dòng)條的重要事件是Change和Scroll B)框架的主要作用是將控件進(jìn)行分組，以完成各自相對(duì)獨(dú)立的功能 C)組合框是組合了文本框和列表框的特性而形成的一種控件D)計(jì)時(shí)器控件可以通過對(duì)Visible屬性的設(shè)置，在程序運(yùn)行期間顯示在窗體上，在程序運(yùn)行的過程中，若選中復(fù)選框，（）A)True B)2 C)0 D)1 （）A)過程的傳值調(diào)用是將實(shí)參的具體值傳值遞給形參 B)過程的傳址調(diào)用是將實(shí)參在內(nèi)存的地址傳遞給形參C)過程的傳值調(diào)用參數(shù)是單向傳遞的，過程的傳址調(diào)用參數(shù)是雙向傳遞的 D)無論過程傳值調(diào)用還是過程傳址調(diào)用，參數(shù)傳遞都是雙向的，應(yīng)把標(biāo)簽的【 】屬性設(shè)置為true。，必須把scrollbars屬性設(shè)置為2，同時(shí)還應(yīng)把【 】屬性設(shè)置為true。，其名稱為text1，為了使該文本框具有焦點(diǎn)，應(yīng)執(zhí)行的語句是【 】.setfocus。，要在運(yùn)行期間把該文件裝入一個(gè)圖片框，應(yīng)執(zhí)行的語句為 =【】。，必須把該圖像框的【 】屬性設(shè)置為true。、圖片框或圖像框中圖形通過對(duì)象的【 】屬性設(shè)置?！尽繉傩栽O(shè)置。，這可以通過【 】屬性設(shè)置為false來實(shí)現(xiàn)。=sqr(2),則語句Print format$(a,”“)的輸出