程序設(shè)計樣題資料

1、 VB期末考試題A卷一、選擇題 每題2分，共50分（1）以下敘述中錯誤的是 （） A）Visual Basic 是事件驅(qū)動型可視 化編程工具 B）Visual Basic 應(yīng)用程序不具有明顯的開始和結(jié)束語句 C）Visual Basic 工具箱中的所有控件都具有寬度（Width）和高度（Height）屬性 D）Visual Basic 中控件的某些屬性只能在運行時設(shè)置（2）下列可作為 Visual Basic 變量名的是（）A)A#A B)4A C)?xY D)constA（3）無論何控件，都具有一個共同屬性。這個屬性是（） A)Text B)Font C)Name D)Caption（4）表

2、達式 32*2+3 MOD 104 的值是（） A)18 B)1 C)19 D)0（5）設(shè)有如下變量聲明 Dim time1 As Date ,為變量time1正確賦值的表達式是（）A)time1 = #11:34:04 # B)time1 = Format(Time,"yy:mm:dd") C)time1 = #"11:34:04"# D)time1 = Format("hh:mm:ss",Time)（6）在窗體上畫一個名稱為Command1的命令按鈕，編寫以列程序：Private Sub Command1_Click( )Dim

3、a As IntegerStatic b As Integera = a + bb = b + 4Print a,bEnd Sub程序運行后，單擊該命令按鈕三次，屏幕上顯示的值是（） A)4 12 B)0 4 C)4 8 D)8 12（7）Visual Basic 是一種面向?qū)ο蟮某绦蛟O(shè)計語言，構(gòu)成對象的三要素是（） A)屬性、控件和方法 B)屬性、事件和方法 C)窗體、控件和過程 D)控件、過程和模塊（8）下列程序段錯誤的是（） A)Dim a As Integera = array(1,2,3,4) B)Dim a(),b()a = array(1,2,3,4):b = a C)Dim a

4、 As Varianta = array(1,"asd",true) D)Dim a() As Varianta = array(1,2,3,4)（9）引用列表框（List1）最后一個數(shù)據(jù)項應(yīng)使用的表達式是（） A)List1.List(List1.ListCount) B)List1.List(List1.ListCount-1) C)List1.List(ListCount) D)List1.List(ListCount-1)（10）在窗體上畫一個名稱為Command1的命令按鈕，編寫如下程序：Private Sub Command1_Click()Print pl(3

5、,7)End SubPublic Function pl(x As Single,n As Integer) As SingleIf n=0 Thenpl=1ElseIf n Mod 2=1 Thenpl=x*x+nElseP1=x*x-n End IfEnd IfEnd Function程序運行后，單擊該命令按鈕，屏幕上顯示的結(jié)果是（） A)2 B)1 C)0 D)16（11）執(zhí)行如下語句：ainutBox(”Today”，”TomorroW，”Yesterday”,"Day before yesterday" ,5) 將顯示一個輸入對話框，在對話框的輸入?yún)^(qū)中顯示的信息是

6、A)Today B)Tomorrow C)Yesterday D)Day before yesterday(12)設(shè)有語句open "c：TestDat" For OutPut則以下錯誤的敘述是 （）A)該語句打開C盤根目錄下一個己存在的文件TestDa B)該語句在C盤根目錄下建立一個名為TestDat的文 C)該語句建立的文件的文件號為1 D)執(zhí)行該語句后，就可以通過Print#語句向文件TestDat中寫入信息(13) Sub過程與Function過程最根本的區(qū)別是（）A) Sub過程可以用Call語句直接使用過程名調(diào)用，而Function過程不可以B) Functi

7、on過程可以有形參，Sub過程不可以C) Sub過程不能返回值，而Function過程能返回值D) 兩種過程參數(shù)的傳遞方式不同(14)下列關(guān)于過程敘述不正確的是（）A)過程的傳值調(diào)用是將實參的具體值傳值遞給形參B)過程的傳址調(diào)用是將實參在內(nèi)存的地址傳遞給形參C)過程的傳值調(diào)用參數(shù)是單向傳遞的，過程的傳址調(diào)用參數(shù)是雙向傳遞的D)無論過程傳值調(diào)用還是過程傳址調(diào)用，參數(shù)傳遞都是雙向的（15）設(shè)組合框Combo1中有3個項目，則以下能刪除最后一項的語句是（）A）Combo1.RemoveItem TextB）Combo1.RemoveItem2 C）Combo1.RemoveItem 3D）（16）下

8、列敘述中正確的是（）A) 在窗體的Form_Load事件過程中定義的變量是全局變量B) 局部變量的作用域可以超出所定義的過程C) 在某個Sub過程中定義的局部變量作用域只限于該過程可以與其它事件過程中定義的局部變量同名，但其D) 在調(diào)用過程時，所有局部變量被系統(tǒng)初始化為0或空字符串(17) 以下敘述中錯誤的是（）A) 在同一窗體的菜單項中，不允許出現(xiàn)標(biāo)題相同的菜單項B) 在菜單的標(biāo)題欄中，“&”所引導(dǎo)的字母指明了訪問該菜單項的訪問鍵C) 程序運行過程中，可以重新設(shè)置菜單的Visible屬性D) 彈出式菜單也在菜單編輯器中定義(18) 以下敘述中錯誤的是（）A) 在程序運行時，通用對話框

9、控件是不可見的B) 在同一個程序中，用不同的方法(不同的作用如ShowOpen或ShowSave等）打開的通用對話框具有C) 調(diào)用通用對話框控件的ShowOpen方法，可以直接打開在該通用對話框中指定的文件D) 調(diào)用通用對話框控件的ShowColor方法，可以打開顏色對話框（19）設(shè)S=“中華人民共和國”，表達式Left（S,1）+Right（S,1）+Mid（S,3,2）的值為（） A) “中華民國” B) “中國人民” C) “中共人民” D) “人民共和”(20) 在Visual Basic中，要將一個窗體加載到內(nèi)存進行預(yù)處理但不顯示，應(yīng)使用的語句是（） A) Load B) Show

10、C) Hide D) Unload(21)以下能夠正確計算n!的程序是 A) Private Sub Commandl_ClicK() n5:x1 Do X=x*1 ii十1 Loop While in Print x End Sub B) Private Sub Commandl_Click() n5: x1：i=1 Do XX*1 ii十1 Loop While in Print x End Sub C)Private Sub Commandl_Click() n=5：x1：i1 Do X=X*1 ii十1 Loop while i<=n Print x End Sub D)Priv

11、ate Sub Commandl_C1ick()< n5：x1：i=1 Do X=X*l i=i十1 loop While in Print x End Sub（22）執(zhí)行了下面程序后，組合框中數(shù)據(jù)項的值是（）Private Sub Form_Click()For i=1 to 6Combo1.AddItem iNext iFor i= 1 to 3Combo1.RemoveItem iNext iEnd Sub A)1 5 6 B)1 3 5 C)4 5 6 D)2 4 6(23) 下列程序的執(zhí)行結(jié)果為Private Sub Command1_Click() Dim FirStr As

12、 StringFirSt="abcdef"Print Pat(FirStr) End SubPrivate Function Pat(xStr As String) As StringDim tempStr As String, strLen As IntegertempStr=""strLen=Len(xStr) i=1Do While i<=Len(xStr) -3tempStr=tempStr+Mid(xStr, i, 1) +Mid(xStr, strLen -i+1, 1) i=i+1LoopPat=tempStrEnd Function

13、 A) abcdef B) afbecd C) fedcba D) defabc（24）下面關(guān)于多重窗體的敘述中，正確的是（） A)作為啟動對象的Main 子過程只能放在窗體模塊內(nèi) B)如果啟動對象是Main 子過程，則程序啟動時不加載任何窗體，以后由該過程根據(jù)不同情況決定是否加載窗體或加載哪一個窗體 C)沒有啟動窗體，程序不能執(zhí)行 D)以上都不對(25)在窗體上畫一個名稱為CommonDialogl的通用對話框，一個名稱為Commandl的命令按鈕。要求單擊命令按鈕時，打開一個保存文件的通用對話框。該窗口的標(biāo)題為"Save"，缺省文件名為“SaveFile ”，在“文件類

14、型”欄中顯示*.txt。則能夠滿足上述要求的程序是 （）A) Private Sub Command_C1ick() CommondialoglFileName=“Savefile”Commondialogl.filter"All Files|*.*|(*.txt)|*.txt|(*.doc)|*.doc"CommonDialoglFilterindex=2 CommonDialoglDial0gtitle"Save" CommonDialoglAction2 End SubB) Private Sub CommandlClick() CommonDia

15、loglFileName"SaveFile" CommonDiaLoglFilter"A11 Files|*.*|(*.txt)|*.txt|*doc|*doc"C0mmonDialoglFilterIndex1 CommonDialoglDialogTitle"Save"CommonDialoglAction2 End Sub C) Private Sub Cmmandl_C1ick() COmmonDialoglFileName"Save" CommonDialoglFiLter"A11Files|*

16、.*|(*.txt)|*.txt|(*.doc)|*.doc"CommonDialoglFilterindex2 C0mmonDialoglDialogTitle"SaveFile"CommonDialoglAction2 End SubD) Private Sub Commandl_C1ick() CommonDialoglFileName"SaveFile" CommonDialoglFilter"All Files|*.*|(*.txt)|*.txt|(*.doc)|*.doc"CommonDialoglFilterI

17、ndex=1 CommonDialoglDialogTitle=“Save”CommonDialoglAction1 End Sub二、填空：每空2分，共20分。（1）visual Basic中有一種控件組合了文本框和列表框的特性，這種控件是【1】_; Visual Basic提供的對數(shù)據(jù)文件問的三種訪問方式為隨機訪問方式【2】_ 和二進制訪問方式;為了在運行時把d:pic文件夾下的圖形文件a.jpg裝入圖片框Picturel，所使用的句為【3】_。 （2）VB 變量聲明格式： Public | Dim 變量名 As 類型，用【4】_關(guān)鍵字聲明的變量在整個應(yīng)用程序中有效，用【5】_關(guān)鍵字聲明的

18、變量過程結(jié)束則消失。 （3）在剛建立工程時，使窗體上的所有控件具有區(qū)別于默認(rèn)值的相同的字體格式，應(yīng)對【6】_的【7】_屬性進行設(shè)置。（4）執(zhí)行下面的程序段后，i的值為【8】_ ，s的值為【9】_ 。s = 2For i = 3.2 To 4.9 Step 0.8s = s + 1Next i（5）提供【10】_函數(shù)用于將字符型轉(zhuǎn)換成數(shù)值。三、程序閱讀題：每題5分，共10分。（1）下面是一個歌手大賽評分程序。10位評委，除去一個最高分和一個最低分，計算平均分(設(shè)滿分為10分)。請在1、2、和3處填入適當(dāng)?shù)膬?nèi)容，將程序補充完整。Private Sub Form_Click()Max= 0Min= 10For i = 1 To 10x