二級Visual+Basic語言程序設計模擬197

1、模擬二級VisualBasic語言程序設計模擬197單項選擇題第1題：設有如下事件過程：PrivateSubForm_Click()Sum=0Fork=1To3Ifk<=1Thenx=1ElseIfk<=2Thenx=2ElseIfk<=3Thenx=3Elsex=4EndIfSum=Sum+xNextkPrintSumEndSub程序運行后，單擊窗體，輸出結果是0A. 9B. 6C. 310參考答案：B程序執(zhí)行過程如下：k=1,k<=1成立，執(zhí)行x=1,sum=sum+x=1k=2,k<=2成立，執(zhí)行x=2,sum=sum+x=1+2=3k=3,k<=3成

2、立，執(zhí)行x=3,sum=sum+x=3+3=6循環(huán)結束。因此最后輸出Sum的值為6。知識點選項個數4試題編號分數題目類型難度第2題：下列關于函數過程的敘述中，正確的是()。A. 如果不指明函數過程參數的類型，則該參數沒有數據類型B. 函數過程的返回值可以有多個C. 函數過程形參的類型與函數返回值的類型沒有關系當數組作為函數過程的參數時，既能以傳值方式傳遞，也能以引用方式傳遞參考答案：C本題考查過程定義。在VB中出現的變量，如果沒有聲明類型，那么為變體型。VB中可以通過調用函數過程得到返回值，一個函數過程只能有一個返回值，如果需要改變主調過程的參數，可以進行傳址方式調用函數。VB數組參數中不存在

3、傳址調用，函數的參數和返回值類型之間沒有任何關系。第3題：下列敘述中，不屆于軟件需求規(guī)格說明書的作用的是（）。A. 便于用戶，開發(fā)人員進行理解和交流B. 反映出用戶問題的結構，可以作為軟件開發(fā)工作的基礎和依據C. 作為確認測試和驗收的依據便于開發(fā)人員進行需求分析參考答案：D軟件需求規(guī)格說明書有以下幾個方面的作用：便于用戶、開發(fā)人員進行理解和交流；反映出用戶問題的結構，可以作為軟件開發(fā)工作的基礎和依據；作為確認測試和驗收的依據。第4題：設窗體上有2個直線控件Linel和Line2,若使兩條直線相連接，需滿足的條件是（）。且Linel.YI且Linel.YI且Linel.YI=Line2.Y2=L

4、ine2.X1=Line2.Y2A. Linel.XI=Line2.X2B. Linel.XI=Line2.Y1且Line1.Y2=Line2.Y2C. Line1.X2=Line2.X1Line1.X2=Line2.X1參考答案：A直線控件的X1、Y1和X2、Y2屆性分別表示直線兩個端點的坐標，即（X1,Y1）和（X2,Y2）。如果要使兩條直線相連，顯然這兩條直線的某一端點的坐標相同才行。因此本題需要Line1.X1=Line2.X1且Line1.Y1=Line2.Y1，或Line1.X1=Line2.X2且Line1.Y1=Line2.Y2，或Line1.X2=Line2.X1且Line1

5、.Y2=Line2.Y1，或Line1.X2=Line2.X2且Line1.Y2=Line2.Y2。因此A）選項正確。第5題：軟件調試的目的是。A. 發(fā)現錯誤B. 改善軟件的性能C. 改正錯誤驗證軟件的正確性參考答案：C在對程序進行了成功的測試之后將進入程序調試，程序調試的任務是診斷和改正程序中的錯誤。第6題：以下不能用形狀控件畫出的圖形是A. 矩形B. 圓形C. 橢圓扇形參考答案：D形狀控件(Shape)提供了顯示一些規(guī)則圖形的簡易方法，通過設置形狀控件Shape屆性值，可顯示6種圖形：0矩形、1正方形、2橢圓、3圓、4圓角矩形、5一圓角正方形。第7題：下面有關標準模塊的敘述中，錯誤的是。A

6、. 標準模塊不完全由代碼組成，還可以有窗體B. 標準模塊中的Private過程不能被工程中的其他模塊調用C. 標準模塊的文件擴展名為.bas標準模塊中的全局變量可以被工程中的任何模塊引用參考答案：A標準模塊中只包含其他窗體模塊中公用的一些變量、過程等代碼，不包括窗體。故選項A誤。標準模塊中，用Private聲明的過程屆于私有過程，只能被它所在的模塊中的其他過程調用，不能被工程中其他模塊調用；用Public聲明的全局變量屆于公用變量,可以被工程中的任何模塊引用。標準模塊的文件擴展名是.bas。第8題：當窗體最小化時縮小為一個圖標，設置這個圖標的屆性是()。A. MouselconB. IconC

7、. PictureMousePointer參考答案：BMouselcon屆性用于設置自定義的鼠標圖標：Icon屆性用于設置窗體最小化時的圖標；Picture屆性用于設置在對象中顯示一個圖形；MousePointer屆性用于設置指示在運行時當鼠標移動到對象的一個特定部分時，被顯示的鼠標指針的類型。因此選項B正確。第9題：編寫如下程序：PrivateSubCommand1_Click()x=4n=1Dox=2*x-3n=n+1PrintxLoopUntilx>30PrintnEndSub在保證程序輸出不變的前提下，可以把循環(huán)條件Untilx>30改為A. Untilx>40B.

8、Untilx>20C. Whilexv40Whilex>20參考答案：B第一次執(zhí)行循環(huán)體彳到x=5,n=2;第二次執(zhí)行循環(huán)體得到x=7,n=3;第三次執(zhí)行循環(huán)體得到x=11,n=4;第四次執(zhí)行循環(huán)體得到x=19,n=5;第五次執(zhí)行循環(huán)體得到x=35,x=6,滿足x>30條件退出循環(huán)。若輸出結果相同，則當x=35時，退出循環(huán)，選項中只有B選項，即x=35時，滿足x>20條件，退出循環(huán)。故選擇B項。第10題：下列敘述中正確的是。A. 數據庫不需要操作系統的支持B. 數據庫不需要操作系統的支持C. 數據庫是存儲在計算機存儲設備中的、結構化的相關數據的集合數據庫系統中，數據的物

9、理結構必須與邏輯結構一致參考答案：C數據庫是存儲在計算機存儲設備中的、結構化的相關數據的集合。數據庫中的數據不只是面向某一項特定的應用，而是面向多種應用，可以被多個用戶、多個應用程序共享，不具有獨立的系統。設計數據庫的目的實質上是設計出滿足實際應用需求的實際關系模型。數據庫技術的主要目的是有效地管理和存取大量的數據資源，包括：提高數據的共享性，使多個用戶能夠同時訪問數據庫中的數據；減小數據的冗余，以提高數據的一致性和完整性；提供數據與應用程序的獨立性，從而減少應用程序的開發(fā)和維護代價。本題答案為C。第11題：如果一個直線控件在窗體上呈現為一條垂直線，則可以確定的是()。A. 它的Y1、Y2屆性

10、的值相等B. 它的X1、X2屆性的值相等C. 它的X1、Y1屆性的值分別與X2、Y2屆性的值相等它的X1、X2屆性的值分別與Y1、Y2屆性的值相等參考答案：BLine控件有四個屆性分另U為X1、Y1,X2、Y2,分別代表兩個端點的橫坐標和縱坐標，如果顯示為一條縱線，則意味著兩個端點的橫坐標一致，即X1=X2第12題：在窗體上有兩個文本框：Text1和Text2,然后編寫如下事件過程：PrivateSubForm_Load()ShowText1.Text="“：Text2.Text="“：Text2.SetFocusEndSubPrivateSubText2_KeyDown(

11、KeyCodeAsInteger,ShiftAsInteger)Textl.Text=Text1.Text+Chr(KeyCode-4)EndSub程序運行后，如果在Text2文本框中輸入”ertyu,則Text1中本框中的內容為()。A. anpuqB. ANPUQC. ERTYUertyu參考答案：B考查鍵盤事件參數。在Text2中按下鍵盤上的某個按鍵時，KeyDowrW件將發(fā)生，其中KeyDowr的KeyCode參數是所按鍵的ASCH碼值，其數據類型為整型，可以對其進行算術運算。Chr(KeyCode-4)表示：KeyCode碼對應字符前面的第4個字符。注意：KeyCodeM回的總是大寫

12、字符。第13題：VB中有3個鍵盤書件：KeyPress、KeyDownKeyUp若光標在Textl文本框中，則每輸入一個字母()。A. 這3個事件都會觸發(fā)B. 只觸發(fā)KeyPress事件C. 只觸發(fā)KeyDownKeyUp事件不觸發(fā)其中任何一個事件參考答案：A當用戶按下某鍵時觸發(fā)KeyDDowrffiKeyPress事件，放開某鍵時觸發(fā)KeyUp事件。故每輸入一個字符，這3個事件都會觸發(fā)。故A選項正確。第14題：在窗體上沒有進行任何屆性設置，然后編寫如下事件過程，則程序運行結果是()。PrivateSubForm_Load()Fori=1To10sum=sum+iNextiPrint”Sum=

13、；sumEndSubA. 在窗體上輸出55B. 在窗體上輸出sum=55C. 出錯窗體上不輸出參考答案：D本題考查Load事件運行。當裝入窗體事件觸發(fā)時，通常用于對屆性和變量初始化，一般不使用Print方法，若想Print方法在Form_Load事件過程中起作用，必須設置窗體的AutoRedraw為True,否則Print方法不起作用。第15題：下列不屆于結構化分析的常用工具的是0A. 數據流圖B. 流程圖C. 數據字典判定樹和判定表參考答案：B第16題：下列敘述中正確的是A. 一個算法的空間復雜度大，則其時間復雜度也必定大B. 一個算法的空間復雜度大，則其時間復雜度必定小C. 一個算法的時間

14、復雜度大，則其空間復雜度必定小算法的時間復雜度與空間復雜度沒有直接關系參考答案：D算法的空間復雜度是指算法在執(zhí)行過程中所需要的內存空間，算法的時間復雜度,是指執(zhí)行算法所需要的計算工作量，兩者之間并沒有直接關系，答案為D。第17題：在窗體上畫一個名稱為Combol的組合框，名稱為Textl的文本框，以及名稱為Command的命令按鈕，如圖所示。運行程序，單擊命令按鈕，將文本框中被選中的文本添加到組合框中，若文本框中沒有選中的文本，則將文本框中的文本全部添加到組合框中。命令按鈕的事件過程如下：PrivateSubCommand1_Click()IfText1.Se1Length0ThenElseC

15、ombo1.AddItemText1EndIfEndSub程序中橫線處應該填寫的是（）。A. Combol.AddItemTextl.TextB. Combol.AddItemTextl.SelStartC. Combol.AddItemTextl.SelTextCombol.AddItemTextl.SelLength參考答案：C根據題意可知，橫線處應該是將文本框中的選中文本添加到組合框中。文本框Text屆性返回整個文本框中的文本，因此A）選項錯誤；SelStart屆性返回選中文本的起始位置，因此B）選項錯誤；SelLength屆性返回選中文本的長度，因此D）選項錯誤；SelText屆性返回

16、選中的文本，因此C）選項正確。第18題：設窗體名稱為frm1。以下敘述中正確的是（）。A. 運行程序時，能夠加載窗體的事件過程是frm1_LoadB. 運行程序時，能夠加載窗體的事件過程是Form1_LoadC. 程序運行中用語句：frm1.Name="NeW可以更改窗體名稱程序運行中朋語句：frm1.caption="新標題”可以改變窗體的標題參考答案：D一個控件的事件過程由控件的實際名字（Name屆性）、下劃線和事件名稱組成，而窗體事件過程由“For"'、下劃線和事件名組成。因此，不管窗體名稱是什么，窗體加載事件過程總是FormLoad。窗體的名稱即N

17、amefll性在程序運行時不可以更改，窗體的標題即Caption屆性則可以在程序運行時更改。第19題：單擊命令按鈕執(zhí)行以下程序，輸出結果為（）。PrivateSubCommand1_Click（）DimxAsInteger,yAsIntegerx=12:y=32CallProc（x,y）Printx；yEndSubPublicSubProc（nAsInteger,ByValmAsInteger）n=nMod10:m=mMod10EndSubA. 1232B. 232C. 23123參考答案：B考查過程調用中的參數傳遞。參數傳遞時默認為地址傳遞，如果實參為常量或者形參加上ByVal關鍵字說明，則

18、為傳值傳遞。中第一個參數為地址傳值傳遞，第二個參數為傳遞，因此調用以后x值為2,而y不變。第20題：設窗體上有一個文本框Textl和一個命令按鈕Command1并有以下事件過程：PrivateSubCommand1_Click()DimSAsString,chAsStringS=Fork=1ToLen(Text1)ch=Mid(Text1,k,1)S=ch+sNextkText1.Text=sEndSub程序執(zhí)行時，在文本框中輸入“Basic”，然后單擊命令按鈕，貝UText1中顯小的是()。A. BasicB. cisaBC. BASICCISAB參考答案：BLen函數返回字符申的長度，Mi

19、d函數為字符申中部截取函數格式為：Mid(字符申，起始位置，長度)。程序中，For循環(huán)的終值是Text1中輸入的字符申的長度，即“Basic”的長度為5。循環(huán)體中Mid函數從笫一個字符開始依次取出一個字符，然后與上次取出的字符連接，本次取出的字符在前，上次取出的字符在后。最終變量s中應該是“cisaB”第21題：要使窗體從屏幕上消失但仍在內存中，應使用的方法或語句為。A. ShowB. HideC. LoadUnload參考答案：B第22題：有如下程序：PrivateSubForm_Click()DimsAsInteger,pAsIntegerp=1Fori=1To4Forj=1Tois=s+

20、jNextjp=p*sNextiPrintpEndSub程序運行后，單擊窗體，則輸出結果是0A. 90B. 180C. 400800參考答案：D程序是一個雙層For循環(huán)，外層循環(huán)變量的值決定內層For循環(huán)的次數。當i=1時，內層循環(huán)1次，s=1,p=1當i=2時，內層循環(huán)2次，s=1+1+2=4,p=1*4=4當i=3時，內層循環(huán)3次，s=4+1+2+奏10,p=4*10=40當i=3時，內層循環(huán)4次，s=10+1+2+3+A20,p=40*20=800第23題：有如下的程序段：Dimt(10)Fork=2To10t(k)=10-kNextkx=6Printt(2+t(x)程序運行后，輸出結果

21、為。A. 2B. 3C. 45參考答案：C第24題：在數據庫設計中，將E-R圖轉換成關系數據模型的過程屆于。A. 需求分析階段B. 概念設計階段C. 邏輯設計階段物理設計階段參考答案：CER圖轉換成關系模型數據則是把圖形分析出來的聯系反映到數據庫中，即設計出表，所以屆于輯設計階段。第25題：下列有語法錯誤的賦值語句是。A. y=7=9B. s=m+nC. Text1.Text=10m+n=12參考答案：D賦值語句的格式是：變量名=表達式。賦值號左邊必須是變量名，不能是表達式或常量。D選項中賦值號左邊m+n是表達式，不是變量名，故D選項錯誤。第26題：以下為用戶自定義函數：FunctionFun

22、c(aAsInteger,bAsInteger)AsIntegerStaticmAsInteger,iAsIntegerm=0:i=2i=i+m+im=i+a+bFunc=mEndFunction在窗體上畫一個命令按鈕，然后編寫如下事件過程：PrivateSubCommand1_Click()DimkAsInteger,mAsInteger,pAsIntegerk=4:m=1p=Func(k,m)PrintpEndSub程序運行后，單擊命令按鈕，輸出結果為()。A. 8B. 9C. 1011參考答案：B變量i的計算過程為i=2+0+2=4，變量m的計算過程為m=4+4+1=9,m的值通過子函數

23、名Func返回。第27題：設有如下程序：OptionBase1Dima(3,4)AsInteger,b(4,3)AsIntegerPrivateSubCommandlClick()'循環(huán)1Fori=1To3Forj=1To4b(j,i)=a(i,J)NextjNextI'循環(huán)2X=b(1,1)Fori=1T04Forj=1T03Printb(i,j);Ifxb(i,j)ThenX=b(i,j)NextjPrintNextiEndSub程序中的數組a已被賦值。以下關于上述程序的敘述中，正確的是()。A. 窗體模塊中，不能使用Dim聲明a、b數組B. “循環(huán)T可以正常運行C. “循

24、環(huán)2”中循環(huán)變量i、j的終值不對，所以不能正常運行程序可以正常運行，x中保存的是數組b中所有元素中最小的數參考答案：BDim用于在標準模塊、窗體模塊或過程中定義變量或數組。程序可以正常運行,x中保存的是數組b元索中的最大值。第28題：假定有以下循環(huán)結構：DoUntil條件表達式循環(huán)體Loop則以下正確的描述是()。A. 如果“條件表達式”的值是0,則一次循環(huán)體也不執(zhí)行B. 如果“條件表達式”的值不為0,則至少執(zhí)行一次循環(huán)體C. 不論“條件表達式”的值是否為“真”，至少要執(zhí)行一次循環(huán)體如果“條件表達式”的值恒為0,則無限次執(zhí)行循環(huán)體參考答案：D本題的DoUntilLoop循環(huán)結構是先判斷，再執(zhí)行

25、的結構。DoUntil循環(huán)語句執(zhí)行的過程是，先判斷條件表達式的值，如果條件表達式的值為0或False時,即條件不成立時，則執(zhí)行循環(huán)體，否則當條件表達式的值為非0或True時，即成立，則退出DO-Loop循環(huán)。本題中，選項A條件表達式的值是0,說明條件不成立，執(zhí)行循環(huán)體。故A錯誤。選項B條件表達式的值不為0,說明條件成立，退出循環(huán)。故B錯誤。選項C中DoUntilLoop語句中條件表達式的值為“假”時，才至少執(zhí)行一次循環(huán)體，故C錯誤。選項D中條件表達式的值恒為0,說明表達式總是不成立，所以可以無限執(zhí)行循環(huán)體，故D選項正確。第29題：下歹0關于棧的敘述中正確的是oA. 在棧中只能插入數據，不能刪除

26、數據B. 在棧中只能刪除數據，不能插入數據C. 棧是先進后出(FILO)的線性表棧是先進先出(FIFO)的線性表參考答案：C棧是限定在一端進行插入與刪除的線性表。棧是按照"先進后出"的或后進先出的原則組織數據的，因此，棧也被稱為“先進后出”表或“后進先出”表。本題答案是C。知識點選項個數4試題編號分數題目類型難度第30題：軟件設計中劃分模塊的一個準則是（）。A. 低內聚低耦合B. 局內聚低耦合C. 低內聚局耦合高內聚高耦合參考答案：B一般較優(yōu)秀的軟件設計應盡量做到高內聚、低耦合，即減弱模塊之間的耦合性和提高模塊內的內聚性，有利于提高模塊的獨立性，因此本題答案為B）。第31題

27、：下歹0有關控件的敘述中，正確的是A. 命令按鈕不響應DblClick事件B. 標簽的主要作用是顯示文本信息，它不響應Click事件C. 標簽中的文本信息通過Text屆性顯示在設計階段，圖片框中建立的控件可以拖拽到圖片框之外參考答案：A使用命令按鈕時，一般都是單擊按鈕，命令按鈕不支持雙擊事件，如果雙擊命令按鈕，則將作為兩次單擊事件分別處理，故A項正確。B項標簽的主要作用是顯示一小段文本，可以響應單擊或雙擊事件，故B錯誤。標簽中的文本信息用Caption屆性表示，故C錯誤。正在設計階段通過屆性窗口裝入圖形文件，但不可將圖片框中建立的控件拖拽到圖片框以外，故D錯誤。第32題：要使兩個單選按鈕屆于同

28、一個框架，下面三種操作方法中正確的是（）。 先畫一個框架，再在框架中畫兩個單選按鈕 先畫一個框架，再在框架外畫兩個單選按鈕，然后把單選按鈕拖到框架中 先畫兩個單選按鈕，再畫框架將單選按鈕框起來A. B. 、C. 、參考答案：A的操作方法可使兩個單選按鈕屆于同一個框架，其他方法不行。故A選項正確。第33題：下列操作說明中，錯誤的是。A. 在具有焦點的對象上進行一次按下字母鍵操作，會引發(fā)KeyPress事件B. 可以通過MousePointer屆性設置鼠標光標的形狀C. 不可以在屆性窗口設置MousePointer屆性可以在程序代碼中設置MousePointer屆性參考答案：C可以在屆性窗口中給M

29、ousePointer屆性設置屆性值。故C選項錯誤。第34題：有三個關系表R、S和T如下，其中三個關系對應的關鍵字分別為A,B和復合關鍵字（A,B）。表T的記錄項（b,q,4）違反了A. 實體完整性約束B. 參照完整性約束C. 用戶定義的完整性約束關系完整性約束參考答案：B關系模型中可以有3類完整性約束：實體完整性約束、參照完整性約束和用戶定義的完整性約束。實體完整性約束是指,若屆性M是關系的主鍵,則屆性M中的屆性值不能為空值。T中主鍵不為空，A選項錯誤。參照完整性約束是指，若屆性（或屆性組）A是關系M的外鍵，它與關系M的主碼相對應，則對于關系M中的每個元組在A上的值必須為：要么取空值；要么等

30、于關系M中某個元組的主碼值。屆性B為關系S的外鍵，它與關系S的主鍵相對應，則T中元組在B上應該為空或者與S中主鍵值相等，題目中不相等，違反參照完整性約束，B選項正確。此題關系中無語義要求，C選項錯誤。第35題：為了聲明一個長度為128個宇符的定長字符申變量StrD,以下語句中正確的是（）。A. DimStrDAsStringB. DimStrDAsString（128）C. DimStrDAsString128DimStrDAsString*128參考答案：D有定長和不定長的字符申變量。默認情況下，定義的字符申變量屆于不定長的，字符申長度可以改變，比如：DimstrAsString。如果聲明一

31、個定長字符申變量，形如DimstrAsString*字符個數。故D選項正確。第36題：窗體上有一個名稱為Timerl的計時器控件，一個名稱為shape1的形狀控件，其Shape屆性值為3(Circle)。編寫程序如F：PrivaleSubFormLJmd()shape1.Top=0Tirnerl.Interval=100EndSubPrivateSubTimer1Timer()StaticXAsIntegershape1.Top=shape1.Top+100X=X+lIfXM0d10:0Thenshape1.Top=0EndIfEndSub。以下關于上述程序的敘述中，錯誤的是()0A. 每執(zhí)行

32、一次Timer1_Timer事件過程,X的值都在原有基礎上增加1B. shape1每移動10次叫到起點，重新開始C. 窗體上的shape1由下而上移動shape1每次移動100參考答案：C題目中變量X定義為Stalic,即每次進入Timer事件過程時，x都會保留上次的值，從而實現每執(zhí)行一次Timer1_Titmer事件過程X的值都在原有的基礎上增加。程序中判斷調用Timer事件過程10次后，重置shape1的top值為0,即回到起點?？丶hape1的Top屆性是距離窗體項的位置，數值越大距離越遠，因此shape1會由上向下多動。第37題：下面程序計算并輸出的是()。PrivateSubCom

33、mand1Click()a=10S=0DoS=S+a*a*aa=a-1LoopUntila=0PrintSEndSubA. 1³+2³+3³+10³的值B. 10!+3!+2!+l!的值C. (1+2+3+-+10)³的值10個10³的和參考答案：A第38題：下列關于通用對話框CD1的敘述中，錯誤的是()。A. 使用CD1

34、ShowColor方法，可顯示“顏色”對話框B. 顯示“字體”對話框前，必須先設置CD1的flags屆性，否則會出錯C. 只要在“打開”對話框中選擇了文件，并單擊“打開”按鈕，即可將選中的文件打開CancelError屆性用于控制用戶單擊“取消”按鈕關閉對話框時，是否顯示出錯警告參考答案：C通用對話框(CommonDialog)提供諸如打開文件(ShowOpen)保存文件(ShowSave)、設置打印選項(ShowPrinter)、選擇顏色和字體(ShowFont)、顯示幫助(ShowHelp)等操作的一組標準對話框，該控件運行時不可見。當通用對話框顯示為“打開”類型時，單擊“打開”按鈕后其F

35、ileName屆性可返回或設置所選文件的路徑和文件名，但并不能直接打開該文件。使用顯示字體(Font)對話框之前，必須先設置控件的flags屆性為CD1CFBothCD1CFPrinterFonts、CD1CFScreenFontsS3個值中的一個。CancelError屆性用于設置當用戶選擇“取消”按鈕時，是否顯示錯誤信息(默認為否)。第39題：當文本框中的內容發(fā)生改變時所觸發(fā)的事件是。A. KeyUpB. ChangeC. LostFocusGotFocus參考答案：B文本框中內容有變化時，觸發(fā)Change事件。故B選項正確。當在文本框中輸入數據，松開鍵盤時觸發(fā)它的KeyUp事件；文本框失

36、去焦點觸發(fā)LostFocus事件；獲得焦點，觸發(fā)GotFocus事件。第40題：在窗體上畫一個名稱為Text1的文本框，并編寫如下程序：OptionBase1PrivateSubForm_Click()DimarrDimStartAsInteger,FinishAsIntegerDimSumAsIntegerarr=Array(12,4,8,16)Start=LBound(arr)Finish=UBound(arr)Sun0Fori=StartToFinishSuSu"arr(i)Nextic=Sum/FinishTextl.Text=cEndSub運行程序，單擊窗體，則在文本框中顯

37、示的是。A. 40B. 10C. 1216參考答案：B程序中將變量arr初始化為有4個元素的數組，使用Lbound和Ubound函數分別獲取數組下標的上下限，然后將數組中的元素值相加，用整除運算求它們的平均值。算式可寫為(12+4+8+16)/4=(40)/4=10。所以答案為B?；静僮黝}第41題：(1)請根據以下各小題的要求設計VisualBasic應用程序(包括界面和代碼)。在名稱為Form1的窗體上建立一個名稱為Command的命令按鈕數組，含三個命令按鈕，它們的Index屆性分別為0、1、2,標題依次為”是”、”否”、”取消”，每個按鈕的高、寬均為300、800。窗體的標題為”按鈕窗

38、口”。運行后的窗體如圖4(如錯誤！未找到引用源)所示。注意：存盤時必須存放在考生文件夾下，工程文件名為sjt1.vbp,窗體文件名為sjt1.frm。(2)在名稱為Form1的窗體上畫一個名稱為Sha1的形狀控件，然后建立一個菜單，標題為”形狀”，名稱為shoe。，該菜單有兩個子菜單，其標題分別為”正方形”和”圓形”，其名稱分別為shape1和shoe2,如圖5所示，然后編寫適當的程序。程序運行后，如果選擇”正方形”菜單項，則形狀控件顯示為正方形；如果選擇”圓形”菜單項，則窗體上的形狀控件顯示為圓形。注意：程序中不能使用變量，每個事件過程中只能寫一條語句。保存時必須存放在考生文件夾下，工程文件

39、名為sjt2.vbp,窗體文件名為sjt2.frm。簡單應用題第42題：考生文件夾下的工程文件sjt3.vbp中有2個初始標題分別為“移動”和“退出”的命令按鈕；1個初始狀態(tài)為不可用的時鐘Trimerl。請?zhí)砑?個標簽Labell,其標題為“計算機考試”，字體為黑體小四號字，左邊界為500,且能根據顯示的內容自動調整大小，如圖所示。程序功能如下：單擊標題為“移動”的按鈕時，該按鈕標題白動變換為“暫停”，且標簽在窗體中開始向右移動。當標簽右側到達窗體右界時，標簽移動的方向改變?yōu)閺挠蚁蜃笠苿?；當標簽左側觸及窗體左界時，標簽移動的方向改變?yōu)閺淖笙蛴乙苿?，如此反復。單擊標題為“暫停”的按鈕時，該按鈕的標題白動變換為“移動”，并暫停標簽內容的移動。單擊“退出”按鈕，則結束程序的運行。命令按鈕的Click事件過程已經給出，但事件過程不完整，請將其中注釋符去掉，把？改為正確的內容，以實現上述程序的功能。注