【正文】 答案： 1：StaticstaticSTATIC等級：2 難度：2知識點：VB知識點/變量與過程的作用域21程序運行后，單擊命令按鈕，在窗體上分別輸出______和______。答案： 1：不可以不能等級：1 難度：1知識點：VB知識點/函數(shù)過程21Visual Basic的模塊分為三類，它們是______、標準模塊、類模塊。請問，下次再進入過程B時，x的值為______。答案： 1：VariantvariantVARIANT可變?nèi)f用等級：1 難度：1知識點：VB知識點/參數(shù)的傳遞20當數(shù)組作為函數(shù)的參數(shù)時，只能使用______的方式。答案： 1：PublicPUBLICpublic等級：1 難度：1知識點：VB知識點/參數(shù)的傳遞20如果在Function函數(shù)過程和Sub過程的定義語句前加上Static關鍵字，則表明該過程內(nèi)所有的______均為靜態(tài)變量。答案： 1：123456等級：1 難度：1知識點：VB知識點/運算符及表達式20若調(diào)用過程時，采用地址傳遞方式，則應在形參說明前添加關鍵字______或缺省。答案： 1：窗體\模塊級變量窗體/模塊級變量等級：1 難度：1知識點：VB知識點/變量與過程的作用域20表達式123 amp。答案： 1：局部變量等級：1 難度：120過程的作用域有窗體／模塊級和______。答案： 1：SubSUBsub等級：1 難度：1知識點：VB知識點/Sub過程19Function函數(shù)過程通過______返回函數(shù)值。答案： 1：子程序subSUBSub等級：1 難度：1知識點：VB知識點/引言19以保留字______開始的是函數(shù)過程。答案： 1：ByValbyvalBYVAL等級：1 難度：1知識點：VB知識點/參數(shù)的傳遞19若要編寫一些全局性的Sub子過程，也就是說能從多個窗體中訪問這些過程，應將它們放在______中。答案： 1：.frm.Frm.FRMfrmFrmFRM等級：1 難度：1知識點：VB知識點/文件結構及分類19在窗體上畫一個名稱為Command1的命令按鈕，并編寫如下程序：Private Sub Command1_Click()Dim x As IntegerStatic y As Integerx=10y=5Call f1(x,y)Print x,yEnd SubPrivate Sub f1(ByRef x1 As Integer,y1 As Integer)x1= x1+2y1= y1+2End Sub程序運行后，單擊命令按鈕后，在窗體上顯示的內(nèi)容是______。答案： 1：PrivateprivatePRIVATE等級：1 難度：1知識點：VB知識點/變量與過程的作用域19標準模塊存盤后，形成的磁盤文件擴展名是______。答案： 1：staticStaticSTATIC等級：1 難度：1知識點：VB知識點/變量與過程的作用域18在模塊文件中的聲明部分用Global或______關鍵字聲明的變量為全局變量。 t,End SubFunction Tax (a() As Integer) Dim t, i% t=1 For i=2 To UBound(A．t=t * a(i) Next i Tax=t End Function答案： 1：24等級：3 難度：3知識點：VB知識點/應用案例18下面程序利用Array建立一個數(shù)組，并查找輸出該數(shù)組的最小值，請在空白處填入相應的代碼：Option Base 1Private Sub Command1_Click()Dim arr1Dim Min As Integer,i As Integerarr1 = Array(43, 68, 25, 65,78,12,79,43)Min=______For i = 2 To 8If arr1(i)Min Then ______Next iPrint 最小值是：；MinEnd Sub答案： 1：arr1(1)2：Min=arr1(i)等級：3 難度：3知識點：VB知識點/數(shù)組應用舉例18VB的賦值語句既可以給變量賦值，也可給對象的______賦值。答案： 1：控件等級：1 難度：1知識點：VB知識點/VB的對象、屬性、方法和事件18有如下事件過程，單擊命令按鈕扣，輸出結果t為______。sum＝0For i＝1 To 10sum＝sum+______Next iPrint sum＝。Private Sub Command1_Click() Static k(2) As Integer For i =1 To 2k(i)=k(i1)+10Next i k(0)=k(2)Print k(2)End Sub答案： 1：40等級：2 難度：2知識點：VB知識點/VB的工程結構18以下程序代碼將整型動態(tài)數(shù)組X聲明為具有20個元素的數(shù)組,并給數(shù)組的所有元素賦值1。答案： 1：4等級：1 難度：1知識點：VB知識點/數(shù)組的定義和引用17在窗體上畫一個命令按鈕，然后編寫如下事件過程：Private Sub Command1_Click()Dim a(5) As StringFor i =1 To 5a(i)=Chr(Asc(A)+(i1))Next i For Each b In aPrint bNextEnd Sub程序運行后，單擊命令按鈕，輸出結果是______。答案： 1：6等級：1 難度：1知識點：VB知識點/程序書寫規(guī)則及格式約定17如果要把自定義數(shù)據(jù)類型定義為Public就必須在______模塊中定義。答案： 1：PreservepreservePRESERVE等級：2 難度：2知識點：VB知識點/靜態(tài)數(shù)組與動態(tài)數(shù)組17利用Array給數(shù)組賦初值時，所聲明的數(shù)組可說明成Variant類型或者______類型。答案： 1：18十八一十八一八等級：1 難度：1知識點：VB知識點/靜態(tài)數(shù)組與動態(tài)數(shù)組17如果在模塊的聲明段中有Option Base 0語句，則在該模塊中使用Dim a(6, 3 To 5)聲明的數(shù)組有______個元素。答案： 1：0等級：1 難度：1知識點：VB知識點/控件數(shù)組17下列程序段的執(zhí)行結果為______。答案： 1：pos=pos+Arr(k)2：neg=neg+Arr(k)等級：3 難度：3知識點：VB知識點/數(shù)組應用舉例16用語句 Dim A (3) as Integer，定義的數(shù)組元素個數(shù)是______。Next iEnd Sub 答案： 1：6 5 4 36543等級：3 難度：3知識點：VB知識點/應用程序舉例16用語句 Dim A(3 to 5) As Long 定義的數(shù)組元素個數(shù)是______。答案： 1：4321等級：3 難度：3知識點：VB知識點/綜合應用程序舉例16以下程序運行的結果是______。Next kEnd Sub程序運行后，單擊命令按鈕，輸出結果是______。Private Sub Form_Click()Dim ary(1 To 4) As IntegerDim i As IntegerDim sum As Integersum = 1For i = 1 To 4ary(i) = isum = sum + ary(i)Next iPrint sumEnd Sub答案： 1：11等級：3 難度：3知識點：VB知識點/數(shù)組應用舉例16在窗體上添加一個命令按鈕Command1，然后編寫如下代碼：Option Base 1Private Sub Command1_Click()d = 0: c = 10x = Array(10, 12, 21, 32, 24)For i = 1 To 5If x(i) c Thend = d + x(i)c = x(i)Elsed = d cEnd IfNext iPrint dEnd Sub程序運行后，單擊命令按鈕，輸出結果是______。答案： 1：2 4 6 82468等級：3 難度：3知識點：VB知識點/應用案例16下列語句Dim a(3 ，2 to 2，5)聲明的數(shù)組a包含的元素個數(shù)有______個。Next iEnd Sub答案： 1：2 4 6 82468等級：3 難度：3知識點：VB知識點/綜合應用程序舉例160、閱讀程序：Sub subp(b() As Integer)For i = 1 To 4b(i) = 2 * iNext iEnd SubPrivate Sub Command1_Click()Dim a(1 To 4) As Integera(1) = 5: a(2) = 6: a(3) = 7: a(4) = 8subp aFor i = 1 To 4Print a(i)。答案： 1：12等級：3 難度：3知識點：VB知識點/應用案例15以下程序段的運行結果是______。 j運行后，輸出的結果是_____。Private Sub Command1_Click()Sum = 0For i = 0 To 4Sum = Sum + ______Next______= SumEnd Sub答案： 1：Label1(i).Captionlabel1(i).caption2：等級：3 難度：3知識點：VB知識點/VB的工程結構15由下列語句定義的數(shù)組占用______字節(jié)的內(nèi)存空間。單擊計算按鈕，則將標簽數(shù)組各元素的值累加，然后計算結果顯示在Label2。名稱為Label2的標簽用于顯示計算結果，其Caption屬性的初始值為空；標簽Label3的標題為計算結果。請?zhí)羁?。For J= 1 To 10A(J)=2*JB(J)=A(J)*2Next JPrint B(J/2+)End答案： 1：24等級：2 難度：2知識點：VB知識點/循環(huán)結構15設有程序：Option Base 1Private Sub Command1_Chick()Dim arr1, Max as Integerarrl=Array(12,435,76,24,78,54,866,43)______=arrl(1)For i=1 To 8If arrl(i) Max Then ______Next iPrint 最大值是:。Next MNext nEnd Sub程序運行后，單擊命令按鈕，輸出結果是______。答案： 1：1 2 3 1 4 1123141等級：3 難度：3知識點：VB知識點/數(shù)組應用舉例15在窗體上畫一個命令按鈕(其Name屬性為Command1)，然后編寫如下代碼：Private Sub Command1_Click()Dim M(10) As IntegerFor k= 1 To 10M(k) = 12 kNext kx=6Print M(2 + M(x))End Sub程序運行后，單擊命令按鈕，輸出結果是______。a(t 1) = a(i 2)Elsea(t) = a(i)End IfIf i = 3 Then a(i + 1) = a(t 4)a(4) = 1Prim a(i)。 ) = 。答案： 1：VariantvariantVARIANT等級：1 難度：1知識點：VB知識點/數(shù)組的定義和引用14在窗體上畫一個命令按鈕(其Name屬性為Command1)，然后編寫如下代碼：Private Sub Command1_Click()Dim n() As IntegerDim a,b As Integera = InputBox(Enter the first number)b = InputBox(Enter the second number)ReDim n(a To b)For k = LBound(n,1) To UBound(n,1)n(k) = kPrint n(。答案： 1：8等級：3 難度：3知識點：VB知識點/數(shù)組應用舉例14控件數(shù)組的名字由 Name 屬性指定，而數(shù)組中的每個元素由______屬性指定。答案： 1：藍蘭BULEBlueblue等級：1 難度：1知識點：VB知識點/分支(選擇)結構14Private Sub Command1_Click()Dim i as integer， j as