【正文】 ft Thentext1 = text1 amp。 =。 * amp。 A、只能寫不能讀 B、只能讀不能寫C、即可以讀，也可以寫D、不能讀，也不能寫1，下面程序?qū)σ阎獢?shù)組a，刪除數(shù)組中數(shù)組元素中某個(gè)元素Private Sub Command1_Click()Dim a(), key%, i%, j%a = Array(1, 6, 8, 3, 5, 9, 10, 2, 7, 4)key = Val(InputBox(輸入要刪除的值))For i = 0 To UBound(a)If key = a(i) ThenForj = i + 1 To UBound(a)a(j 1) = a(j)NextjReDim Preserve a(UBound(a) 1)MsgBox (刪除完成)ExitSubEnd IfNext iMsgBox (找不到要刪除的元素)End Sub2，下列程序表示將輸入的一個(gè)數(shù)插入到按遞減的有序數(shù)列中，插入后使該序列仍有序Private Sub Form_Click()Dim a, i%, n%, m%a = Array(19, 17, 15, 13, 11, 9, 7, 5, 3,1)n = UBound(a)ReDim Preserve a(n + 1)m = Val(InputBox(輸入欲插入的數(shù)))For i = UBound(a) 1 To 0 Step 1If m = a(i) Thena(i + 1) = a(i)If i = 0 Then a(i) = mElsea(i + 1) = mExit ForEnd IfNext iFor i = 0 To UBound(a)Print a(i)Next iEnd Sub3，下列程序在1000~9999之間查找滿足如下條件的整數(shù)：該整數(shù)，逆向排列得到的另一個(gè)四位數(shù)是它自身的倍數(shù)（2倍以上）。 A、ChangeB、Scroll C、KeyDownD、KeyUp15在窗體上建立通用對話框需要添加的控件是（C） A、Data控件B、Form控件 C、CommonDialog控件D、VBComboBox控件15下面幾個(gè)關(guān)鍵字均表示文件的打開方式，只能進(jìn)行讀不能寫的是（A）。D、希望在菜單中顯示“amp。 A、在程序運(yùn)行時(shí)，通用對話框控件是不可見的B、在同一個(gè)程序中，用不同的方法(如ShowOpen或ShowSave等）打開的通用對話框具有不同的作用C、調(diào)用通用對話框控件的ShowOpen方法，可以直接打開在該通用對話框中指定的文件D、調(diào)用通用對話框控件的ShowColor方法，可以打開顏色對話框14菜單編輯器中，輸入哪一個(gè)選項(xiàng)（A）會在菜單欄上顯示文本 A、標(biāo)題 B、名稱 C、索引 D、訪問鍵150、菜單控件只有一個(gè)事件（B） A、MouseUp B、Click C、DBClick D、KeyPress15在用通用對話框控件建立“打開”或“保存”文件對話框時(shí)，如果需要指定文件列表框所列出的文件類型是文本文件()，則正確的描述格式是(A)。 A、ValueB、DefaultC、CancelD、Caption14下面說法不正確的是（D）? A、層菜單不允許設(shè)置快捷鍵B、使菜單項(xiàng)中的文字具有下畫線，可在標(biāo)題文字前加amp。 A、ValueB、DefaultC、CancelD、Enabled14假如列表框（List1）有四個(gè)數(shù)據(jù)項(xiàng)，那么把數(shù)據(jù)項(xiàng)“China”添加到列表框的最后，應(yīng)使用語句(D)。 A、()B、()C、(ListCount)D、(ListCount1)14設(shè)窗體上有一個(gè)列表框控件List1，且其中含有若干列表項(xiàng)。 A、框架B、列表框C、復(fù)選框D、單選按鈕13引用列表框（List1）最后一個(gè)數(shù)據(jù)項(xiàng)應(yīng)使用的表達(dá)式是（C） A、()B、(ListCount) C、()D、(ListCount1)13窗體的MouseDown事件過程Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)有4個(gè)參數(shù)，關(guān)于這些參數(shù)，正確的描述是(A)。 A、 3, China B、 China, C、 China, 3D、 China13如果列表框（List1）中沒有被選定的項(xiàng)目， (D)。 A、窗體模塊B、標(biāo)準(zhǔn)模塊C、類模塊D、工程12下面子過程語句說明合法的是（D） A、Sub f1（ByVal n() AsInteger）B、Function f1（f1 As Integer） As IntegerC、Sub f1（n() AsInteger）As IntegerD、Function f1（ByVal n As Integer）As Integer1在過程定義的變量，若希望在離開該過程后，還能保存過程中局部變量的值，則應(yīng)使用(D)關(guān)鍵字在過程中定義局部變量。 Dim x As Integer, y As Integer, z As Integer Subs1(a As Integer, b As Integer) Dim c As Integer a = 2 * a b = b + 2 c = a+ b End Sub Sub s2(a As Integer, ByValb As Integer)Dim c As Integer a = 2 * a b = b + 2c = a + b End SubPrivate Sub Command1_Click()x = 4：y = ：4 z = 6Call s1(x, y) Print x + y + zCall s2(x, y) Print x + y + z End Sub A、24 28 B、20 28C、20 18D、20 2012以下關(guān)于過程及過程參數(shù)的描述中，錯(cuò)誤的是(C)。Private Sub Command1_Click() For i = 1 To 10 GetValue i Next i Print GetValue(i) End Sub Private FunctionGetValue(ByVal a As Integer) Static S As Integer S = S + a GetValue = S End Function A、10B、65C、66D、111在過程定義的變量，若希望在離開該過程后，還能保存過程中局部變量的值，則應(yīng)使用(D)關(guān)鍵字在過程中定義局部變量。 A、10 10 10B、30 30 30C、30 30 10D、10 30 3011以下敘述中錯(cuò)誤的是(D)。 A、相同 B、不相同 C、兩可 D、都不對 10數(shù)組的下標(biāo)可取的變量類型是（A）。 A、15B、16C、13D、不確定10一個(gè)數(shù)組說明為Dima(5，1 to 5) As Integer，則該數(shù)組共有（C） 個(gè)元素。 A、數(shù)值B、字符串C、變體D、數(shù)值或字符串（視輸入的數(shù)據(jù)而定）10一個(gè)數(shù)組說明為Dima(0 to 5，1 to 5) As Integer，則該數(shù)組共有（C） 個(gè)元素。 A、“12334”B、123C、12334D、1579下面程序段顯示的結(jié)果是（A）。 A、Max=IIf(x＞y,x,y)B、If x＞y Then Max=xElse Max=y C、Max=x：If y＞=x Then Max=yD、If y＞x Then Max=y ：Max=x9下列程序段：Dim x If x Then Print x Else Print x+1 運(yùn)行后，顯示的結(jié)果是（A）。 A、“12334”B、123C、12334D、1578設(shè)有語句x=InputBox(“AAAA”，“BBBB”，“”),程序運(yùn)行后，所產(chǎn)生的對話框的標(biāo)題應(yīng)為(C)。 A、TodayB、TomorrowC、YesterdayD、Day before Yesterday8VB提供了結(jié)構(gòu)化程序設(shè)計(jì)的3種基本結(jié)構(gòu)，這3種基本結(jié)構(gòu)是（B）。 A、0 B、空 C、1 D、無任何值7表達(dá)式16/42^5*8/4 Mod 5\2的值為(B)。ABC39。 A、4 B、3 C、6 D、77假設(shè)變量bool_x是一個(gè)布爾型(邏輯型)的變量，則下面正確的賦值語句是（D）A、bool_x = False B、bool_x = .False. C、bool_x = False D、bool_x = False7設(shè)a=“VisualBasic”，下面使b=“Basic”的語句是(B)。A、X_yz B、123abc C、Integer D、XY6以下變量命名非法的是（C）。 A、 B、： C、 D；6從鍵盤上輸入兩個(gè)字符串，分別保存在變量strstr2中。 ABC39。 A、124abc B、111111 C、124 D、abc5設(shè)a=6，則執(zhí)行x=IIf(a5,1,0)后，x 的值為（D） A、5 B、6 C、0 D、15執(zhí)行語句：c$=“Glad”amp。 A、Static B、Const C、Private D、Variant5要強(qiáng)制顯示聲明變量，可在窗體模塊或標(biāo)準(zhǔn)模塊的聲明段中加入語句(B)。 A、0 B、1 C、1 D、7250、如果將布爾常量值TRUE賦值給一個(gè)整型變量，則整型變量的值為(B)。 A、單選按鈕 B、圖片框 C、通用對話框 D、文本框4以下敘述中錯(cuò)誤的是(B)。 A、Form1=“VB_Test” B、=“VB_Test”C、=“VB_Test” D、=“VB_Test”4以下敘述中錯(cuò)誤的是(A)。 A、SetFocus B、VisibleC、Refresh D、GetFocus3INT（100*RND）產(chǎn)生的隨機(jī)整數(shù)的閉區(qū)間是（A）。 A、工程資源管理器窗口 B、工具箱窗口C、代碼窗口 D、屬性窗口3VisualBasic是一種面向?qū)ο蟮目梢暬绦蛟O(shè)計(jì)語言，采取了的編程機(jī)制是(A)。 A、雙擊鼠標(biāo)可以觸發(fā)DblClick事件B、窗體或控件的事件的名稱可以由編程人員確定C、移動鼠標(biāo)時(shí)，會觸發(fā)MouseMove事件D、控件的名稱可以由編程人員設(shè)定3在VisualBasic中最基本的對象是(C)。 A、事件驅(qū)動 B、按過程順序執(zhí)行C、從主程序開始執(zhí)行 D、按模塊順序執(zhí)行2確定一個(gè)控件在窗體上的位置的屬性是(D)。 A、Text B、NameC、ForeColor D、Caption2以下關(guān)于窗體的描述中，錯(cuò)誤的是(A)。1程序運(yùn)行后，在窗體上單擊鼠標(biāo)，此時(shí)窗體不會接收到的事件是(C)。 A、文本框的文本將變成灰色，并且此時(shí)用戶不能將光標(biāo)置于文本框上。A、在設(shè)計(jì)階段使用Picture設(shè)置的背景位圖B、在設(shè)計(jì)階段放置的控件C、在運(yùn)行階段產(chǎn)生的圖形和文字D、以上均可1設(shè)x=3,y=5,則以下表達(dá)式值為真的是 (C)A、(3+5x) And (y0) B、(x0) Eqv (y0) C、(xy) Or (y0) D、x=y And y101為了防止用戶隨意將光標(biāo)置于控件之上，應(yīng)將進(jìn)行(D)設(shè)置。 A、Backcolor B、ForeColorC、AutoRedraw D、BackStyle1若要使命令按鈕不可操作，要對(A)屬性進(jìn)行設(shè)制。 A、相同 B、不相同 C、兩可 D、都不對下面正確的賦值語句是（C）。 MID(123456,3,2)執(zhí)行后，a變量中的值是（C）。 A、結(jié)構(gòu)化程序設(shè)計(jì) B、程序開發(fā)環(huán)境 C、事件驅(qū)動編程機(jī)制 D、程序調(diào)試技術(shù)賦值語句：a=123amp。A、=VisualBasic窗體B、=VisualBasic窗體C、=VisualBasic窗體D、=VisualBasic窗體為了裝入一個(gè)VisualBasic應(yīng)用程序，應(yīng)當(dāng)（D） A、只裝入窗體文件（.frm）B、只裝入工程文件（.vbp）C、分別裝入工程文件和標(biāo)準(zhǔn)模塊文件（.bas）D、分別裝入工程文件、窗體文件和標(biāo)準(zhǔn)模塊文件賦給一個(gè)數(shù)組的數(shù)據(jù)類型一定要（A）。A、Visual Basic 是事件驅(qū)動型可視化編程工具B、Visual Basic應(yīng)用程序不具有明顯的開始和結(jié)束語句C、Visual Basic工具箱中的所有控件都具有寬度（Width）和高度（Height）屬性(計(jì)時(shí)器)D、Visual Basic中控件的某些屬性只能在運(yùn)行時(shí)設(shè)置要使Print方法在Form_Load事件中起作用，要對窗體的(C)屬性進(jìn)行設(shè)置。D、一個(gè)工程默認(rèn)的啟動對象是Form11Cls方法可以清除窗體或圖片框中的(C)內(nèi)容。 A、如果文本框的TabStop屬性為False，則不能接收從鍵盤上輸入的數(shù)據(jù)B、當(dāng)文本框失去焦點(diǎn)時(shí)，觸發(fā)LostFocus事件C、當(dāng)文本框的Enabled屬性為False時(shí)，其Tab順序不起作用D、可以用TabIndex屬性改變Tab順序