2014年4月份考試可視化程序設(shè)計(jì)（VB）第三次作業(yè)一、填空題（本大題共40分，共10小題，每小題4分）1.若在標(biāo)準(zhǔn)模塊中以關(guān)鍵字public定義子過程，則在______中都可以調(diào)用該過程。2.計(jì)時(shí)器每經(jīng)過一個(gè)由Interval屬性指定的時(shí)間間隔就會(huì)觸發(fā)一次______事件。3.VB中三種文件訪問類型是______、______、______4.不論任何控件，共同具有的是______屬性。5.假定有一個(gè)通用對(duì)話框控件CommonDialogl，除了用CommonDialogl．Action＝3顯示顏色對(duì)話框之外，還可以用______方法顯示。6.每一個(gè)過程都有一個(gè)使用范圍，過程的使用范圍稱為______。7.按數(shù)據(jù)的組織方式不同，數(shù)據(jù)庫可以分為3種類型，即______數(shù)據(jù)庫、______數(shù)據(jù)庫和______數(shù)據(jù)庫。8.菜單在運(yùn)行時(shí)的動(dòng)態(tài)增減主要通過控件數(shù)組實(shí)現(xiàn)，首先將菜單項(xiàng)的______屬性設(shè)為False，然后在程序中用______語句加載。9.隨機(jī)文件以______為單位讀寫，二進(jìn)制文件以______為單位讀寫。10.當(dāng)單選按鈕的Value屬性為______時(shí)表示該單選按鈕處于未選中狀態(tài)。二、程序閱讀題（本大題共30分，共5小題，每小題6分）1.下面程序的功能是什么？PrivateSubCommand1_Click()Dima%,s%,n%a=Val(InputBox("Pleaseinputanumber:"))DoWhile(a>0)s=aMod10a=a/10n=n+func(s)LoopPrintnEndSubPrivateFunctionfunc(x%)AsIntegerfunc=x*xEndFunction2.下面程序的功能是什么？PrivateSubCommand1_Click()Dims%,n%DimaAsStringn=0a=InputBox("Pleaseinputanumber:")Fors=1ToLen(a)If(func(Val(Mid(a,s,1))))Thenn=n+1NextPrintnEndSubPrivateFunctionfunc(x%)AsBooleanIf(xMod2=0)Thenfunc=TrueElsefunc=FalseEndIfEndFunction3.寫出下列事件過程的執(zhí)行結(jié)果。PrivateSubCommand1_Click()Dims%s=f(5)Print"s=";sEndSubPrivateFunctionf(ByValnAsInteger)Ifn=1Thenf=1Elsef=n+f(n-1)EndIfEndFunction4.完成一個(gè)時(shí)鐘定時(shí)的程序，要求按下Command1按鈕后開始計(jì)時(shí)，每半個(gè)小時(shí)調(diào)用一次PrintTime()子過程，在窗體上打印當(dāng)前的日期和時(shí)間。要求每空只能寫一個(gè)執(zhí)行語句，不允許用“:”將多個(gè)語句寫在一起。PrivateSubCommand1_Click()____1___________2_______EndSubPrivateSubTimer1_Timer()StaticnAsInteger_____3_____If(n=60)ThenCallPrintTime_____4____EndIfEndSubPrivateSubPrintTime()Form1.FontSize=30Form1.ForeColor=RGB(0,255,0)Form1.BackColor=RGB(0,0,0)Print____5_____EndSub5.寫出下列事件過程的執(zhí)行結(jié)果。PublicxAsIntegerPrivateSubCommand1_Click()x=10PrintxCalls1PrintxCalls2PrintxEndSubPrivateSubs1()x=x+20PrintxEndSubPrivateSubs2()DimxAsIntegerx=x+20PrintxEndSub三、問答題（本大題共30分，共5小題，每小題6分）1.在VisualBasic中可使用哪些格式的圖形文件？2.解釋一下keycode參數(shù)的用法？3.菜單名與菜單項(xiàng)有什么區(qū)別？4.如何在目錄列表框表示當(dāng)前選定的目錄?5.如何解決大數(shù)相乘產(chǎn)生“溢出”問題？答案：一、填空題（40分，共10題，每小題4分）1.參考答案：整個(gè)應(yīng)用程序2.參考答案：Timer3.參考答案：順序、隨機(jī)、二進(jìn)制4.參考答案：Name（名稱）5.參考答案：CommonDialogl．ShowColor6.參考答案：過程的作用域7.參考答案：層次、網(wǎng)狀、關(guān)系8.參考答案：Visible，Load9.參考答案：記錄；字節(jié)10.參考答案：False二、程序閱讀題（30分，共5題，每小題6分）1.參考答案：求一個(gè)數(shù)各位上的數(shù)的平方和。2.參考答案：判斷一個(gè)數(shù)各位上的偶數(shù)個(gè)數(shù)3.參考答案：s=154.參考答案：Timer1.Interval=30000Timer1.Enabled=Truen=n+1n=0Time(),Date()5.參考答案：執(zhí)行結(jié)果為：1030302030三、問答題（30分，共5題，每小題6分）1.參考答案：VisualBasic可處理圖形文件主要有bmp、ico、wmf、jpg、gif和cur。2.參考答案：Keycode參數(shù)表示按下的物理鍵。上檔鍵字符和下檔鍵字符也是使用同一鍵，它們的Keycode值相同。keycode參數(shù)通過ASCII值或鍵代碼常數(shù)來識(shí)別鍵。字母鍵的鍵代碼與此字母的大寫字符的ASCII值相同。3.參考答案：菜單名是菜單欄上表示包含菜單項(xiàng)列表的對(duì)象，菜單項(xiàng)可以包括命令、分隔條和子菜單標(biāo)題。每個(gè)菜單命令項(xiàng)對(duì)應(yīng)一個(gè)應(yīng)用程序，菜單項(xiàng)可以有熱鍵與快捷鍵，而菜單名只能有熱鍵。4.參考答案：在程序運(yùn)行時(shí)雙擊目錄列表框的某目錄項(xiàng)，則將該目錄項(xiàng)改變?yōu)楫?dāng)前目錄，其Dirl．Pah的值做相應(yīng)的改變。而當(dāng)單擊選定該目錄項(xiàng)時(shí)，Dirl．Path的值并沒有改變。為了對(duì)選定的目錄項(xiàng)進(jìn)行有關(guān)的操作，即與ListBox控件中某列表項(xiàng)的選定相對(duì)應(yīng)，則表示如下：Dirl．List（Dirl．Listlndex）5.參考答案：例如：在以下程序代碼中，當(dāng)n的值為較大如1000時(shí)，則運(yùn)行如下程序段會(huì)產(chǎn)生“溢出”問題：Dimn％Pi=2For