【正文】 sual Basic”,焦點的按鈕上2窗體上有一個名稱為Command1的命令按鈕，其事件過程如下：Private Sub Command1_Click()x=“VisualBasicProgramming”a=Right(x,11)b=Mid(x,7,5)C=Msgbox(a, , b)End Sub運行程序后單擊命令按鈕，以下敘述中錯誤的是Ａ）信息框的標題是Basic B)信息框中的提示信息是ProgrammingC) C的值是函數(shù)的返回值　　　　　　D）MsgBox的使用格式有錯2，兩個窗體上分別只有一個名稱Command1的命令按鈕。Form1的代碼如下：Public X As IntegerPrivate Sub Form_load()x=1y=5End SubPrivate Sub Command1_Click() End SubForm2的代碼如下：Private Sub Command1_Ciick()Print ,yEnd SubModule1的代碼如下：Public y As Integer運行以上程序，單擊Form1的命令按鈕Command1，則顯示Form2；再單擊Form2上的命令按鈕Command1，則窗體上顯示的是Ａ）１　?。怠? 　B）０　 　５　 C）０　　０　　 D）程序有錯2窗體上有一個名稱Text1的文本框，一個名稱為Command1的命令按鈕。Text1的KeyUp的事件過程如下：Private Sub Text1_KeyUp(KeyCode As Integer , shift AS Integer)Dim C AS string=Chr(Asc(c)+2)End Sub當向文本框Text1中輸入小寫字母a時，文本框Text2中顯示的是Ａ）Ａ　　　　 　　B）a C)C D)c3設窗體上有一個文體框Text1和一個命令按鈕Command1,并有以下事件過程：Private Sub Command1_Click()Dim S As String , ch As StringS=“”For k=1 TO Len(Text1) ch = Mid(Text1,k,l)S=ch+SNext k=SEnd Sub程序執(zhí)行時，在文本框中輸入“Basic”,然后單擊命令按鈕，則Text1中顯示的是A）Basic B)cisaB C)BASIC D)CISAB3某人編寫了如下程序，用來求10個整數(shù)（整數(shù)從鍵盤輸入）中的最大值：Private Sub Command1_Click()Dim a(10) As Integer, max As IntegerFor k=1 TO 10a(K)=InputBox(“輸入一個整數(shù)”)Next kMax=0For k=1 To 10If a(k)＞max ThenMax = a(k)End IfNext kPrint maxEnd Sub運行程序時發(fā)現(xiàn)，當輸入10個正數(shù)時，可以得到正確結果，但輸入10個負數(shù)時結果是錯誤的，程序需要修改，下面的修改中可以得到正確運行結果的是A) 把If a(k)max Then改為If a(k)max Then B) 把max = a(k)改為a(k)=maxC) 把第2個循環(huán)語句For k=1 TO 10改為For k=2 TO 10 D) 把max=0改為max = a(10)3已知在4行3列的全局數(shù)組score(4,3)中存放了4個學生3門課程的考試成績（均為整數(shù)）。（3）設某循環(huán)隊列的容量為50，頭指針Front=5 (指向隊頭元素的前一位置)，尾指針rear=29（指向隊尾元素），則該循環(huán)隊列中共有[3] 個元素。請?zhí)羁铡?Mid(xStr, i + 1, 1)i = i + 1LoopFun = tStr amp。請?zhí)羁?。其中參?shù)數(shù)組a()中存放給定序列(個數(shù)與數(shù)組a的元素個數(shù)相等)a1,a2,a3...的值，要加密的文本放在參數(shù)變量mystr中，過程執(zhí)行完畢，加密后的文本仍然放在變量mystr中。Timer1的事件過程如下：Private Sub Timer1_Timer()Static flag As IntegerIf flag=0 Then flag=1flag=flagIf flag=1 Then=amp。為綠色End IfEnd Sub以下敘述正確的是A）每次執(zhí)行些事件過程時，flag的初始值為0B）flag的值只可能取0或1C）程序執(zhí)行后，文本框的文字每5秒改變一次顏色D）程序有邏輯錯誤，Else分支總也不能被執(zhí)行（27）為計算1+2+22+23+24+…+210的值，并把結果顯示在文本框Text1中，若編寫如下事件過程：Private Sub Command1_Click()Dim a%,s%,k%s=1a=2For k=2 To 10a=a*2s=s+aNext k=sEnd Sub執(zhí)行此事件過程后發(fā)現(xiàn)結果是錯誤的，為能夠得到正確結果，應做的修改是A）把s=1改為s=0B）把For k=2 To 10改為For k=1 To 10C）交換語句s=s+a和a=a*2的順序D）同時進行B）、C）兩種修改（28）標準模塊中有如下程序代碼：Public x As Integer,y As IntegerSub var_pub()x=10:y=20End Sub在窗體上有1個命令按鈕，并有如下事件過程：Private Sub Command1_Click()Dim x As IntegerCall var_pubx=x+100y=y+100Print x。要求程序運行時，在文本框Text1中輸入一個姓氏，單擊“刪除”按鈕（名稱為Command1），則可刪除列表框List1中所有該姓氏的項目。其中可以作為主關鍵字的是 【5】 。請?zhí)羁铡?1)下列敘述中正確的是A)對長度為n的有序鏈表進行查找，最壞情況下需要的比較次數(shù)為nB)對長度為n的有序鏈表進行對分查找，最壞情況下需要的比較次數(shù)為(n/2)C)對長度為n的有序鏈表進行對分查找，最壞情況下需要的比較次數(shù)為(log2n)D)對長度為n的有序鏈表進行對分查找，最壞情況下需要的比較次數(shù)為(n log2n)(2)算法的時間復雜度是指A)算法的執(zhí)行時間B)算法所處理的數(shù)據(jù)量C)算法程序中的語句或指令條數(shù)D)算法在執(zhí)行過程中所需要的基本運算次數(shù)(3)軟件按功能可以分為：應用軟件、系統(tǒng)軟件和支撐軟件(或工具軟件)。 n amp。Str(n)amp。 n amp。NextPrintNextD)For i=1 To 5For j=1 To 3Print a(i,j)。Private Sub Command1_Click()Text1=””Number=FreeFileOpen “c:\”For Input As NumberDo While Not Eof( 【14】 )Line Input Number,s=+ 【15】 +Chr(13)+Chr(10)LoopClose NumberEnd Sub 一、選擇題（1） （2） （3） （4） （5） （6） （7） （8） （9） （10） （11）C（12）D（13）A（14）C（15）D（16）D（17）A（18）C（19）B（20）C（21）A（22）C（23）A（24）B（25）D（26）C（27）D（28）B（29）D（30）A（31）B（32）D（33）B（34）C（35）A二、填空題 （6） Form2 （7）IS ELSE END Select （8）12 10 （9）Number s 2010年3月計算機等級考試二級VB試試題一、選擇題(每小題2分，共70分)下列各題A)、B)、C)、D)四個選項中，只有一個選項是正確的。*r*rEnd IfEnd Sub （7）設有整形變量s，取值范圍為0~100，表示學生的成績。（4）在數(shù)據(jù)庫技術中，實體集之間的聯(lián)系可以是一對一或一對多或多對多的，那么“學生”和“可選課程”的聯(lián)系為 【4】 。 為實現(xiàn)上述功能，某人把計時器的Interval屬性設置為1000，并編寫了如下程序：Private Sub Timer1_Timer()For k= To Step 100If + Then=+100End IfNext kEnd Sub運行程序時發(fā)現(xiàn)圓立即移動到了右邊的直線處，與題目要求的移動方式不符。 ‘amp。Next iEnd Sub運行程序，單擊命令按鈕，窗體上顯示的內容為A）5 4 3 2 1 1B）5 4 3 2 1C）4 3 2 1 1D）4 4 3 2 1 1（24）在窗體上畫1個命令按鈕，并編寫如下事件過程：Private Sub Command1_Click()Dim a(3,3)For m=1 To 3For n=1 To 3If n=m Or n=4m Thena(m,n)=0End IfPrint a(m,n)。若原文本長度大于n，則只對前面n個字符加密,后面的字符不變；若原文本長度小于n，則在后面補字符*使文本長度為n后再加密。請?zhí)羁胀瓿上旅娴膶傩栽O置和程序，以便實現(xiàn)上述功能。 Right$(a$,12)后,變量C$的值為A)Visual BASIC Programming B)VISUAL C++ ProgrammingC)Visual C++ Programming D)VISUAL BASIC Programming(14)下列敘述中正確的是A)MsgBox語句的返回值是一個整數(shù)B)執(zhí)行MsgBox語句并出現(xiàn)信息框后,不用關閉信息框即可執(zhí)行其他操作C)MsgBox語句的第一個參數(shù)不能省略D)如果省略MsgBox語句的第三個參數(shù)(Title),則信息框的標題為空(15)在窗體上畫一個文本框(名稱為Text1)和一個標簽(名稱為Label1),程序運行后,在文本框中每輸入一個字符，都會立即在標簽中顯示文本框中字符的個數(shù),以下可以實現(xiàn)上述操作的事件過程是A)Private Sub Text1_Change()=str(Len())End SubB)Private Sub Text1_Click()=str(Len())End SubC)Private Sub Text1_Change()=End SubD)Private Sub Label1_Change()=str(Len())End Sub(16)在窗體上畫兩個單選按鈕(名稱分別為Option1,Option2,標題分別為宋體和黑體), 1個復選框(名稱為Check1,標題為粗體)和1個文本框(名稱為Text1,Text屬性為改變　文字字體)，窗體外觀如圖所示?！?*.txt)|*.txt|Batch Files(*.bat)|*.bat” CommonDialog1 Filterlndex=1MsgBox NameEnd Sub程序運行后，單擊命令按鈕，將顯示一個“打開”對話框，此時在“文件類型”框中顯示的是 [11]；，然后單擊“確定”按鈕，則在MsgBox信息框中顯示的提示信息是 [12] 。以下修改方案中正確的是A) 把外層循環(huán)語句For i=1 TO 4改為For i=1 To 3 內層循環(huán)語句For j=1 TO 3 改為For j=1 TO 4 B) 把sum=0移到For i=1 TO 4 和For j=1 TO 3之間 C）把sum = sum+score(i,j)改為sum=sum+score(j,i) D) 把sum=sum+score(i,j)改為sum=score(i,j)二、填空題（1）測試用例包括輸入值集和[1] 值集。如圖所示。要求程序運行時每秒在標簽中顯示一次系統(tǒng)當前時間。窗體文件的程序如下：Private Type xa As Integerb AS IntegerEnd TypePrivate Sub Command1_Click()Dim y As x = InputBox(“”)If \2==*Else = Fix()End If=End Sub對以上程序，下列敘述中錯誤的是Ａ）x是用戶定義的類型 B）InputBox函數(shù)彈出的對話框中沒有提示信息C）若輸入的是偶數(shù)，D）Fix()，轉換為整數(shù)返回2窗體上有一個名稱為CD1的通用對話框控件和由四個命令按鈕組成的控件數(shù)Command1,其下標從左到右分別為0、3,窗體外觀如圖所