A)1  1  1  1  1     
  1  1  1  1  1      
  1  1  1  1  1       
  1  1  1  1  1        
  1  1  1  1  1 
B) 1
        1
           1
              1        
                  1
C)1  0  0  0  0     
  0  1  0  0  0
  0  0  1  0  0
  0  0  0  1  0
  0  0  0  0  1
D) 1  1  1  1  1
【命題目的】考查考生對(duì)循環(huán)結(jié)構(gòu)的掌握。
【解題要點(diǎn)】程序以矩陣格式輸出一個(gè)二維數(shù)組，由程序可知，數(shù)組的主對(duì)角線上的元素賦值為1，其他元素未賦值，初值為0。所以輸出結(jié)果如選項(xiàng)C）所示。
【考點(diǎn)鏈接】Do…Loop循環(huán)結(jié)構(gòu)。
(26) 以下屬于Visual Basic中合法的數(shù)組元素的是
A) K8       
B) k［8］
C) k(0)       
D) k［8］
【命題目的】考查考生對(duì)數(shù)組知識(shí)的掌握。
【解題要點(diǎn)】數(shù)組元素的正確引用。
【錯(cuò)解分析】在Visual Basic中，數(shù)組元素一般形式為x(整數(shù)），括號(hào)中的整數(shù)是一個(gè)確定值，而且數(shù)組名x后的圓括號(hào)不能省去，也不能由其他的括號(hào)代替，所以正確答案是選項(xiàng)C）。
【考點(diǎn)鏈接】控件數(shù)組的引用。
(27) Sub過程與Function過程最根本的區(qū)別是
A) Sub過程的過程不能返回值，而Function過程能返回值
B) Function過程可以有形參，Sub過程不可以
C) Sub過程可以使用Call語句直接使用過程名調(diào)用，而Function過程不可以
D) 兩種過程參數(shù)的傳遞方式不同
【命題目的】考查考生對(duì)函數(shù)和過程的理解。
【解題要點(diǎn)】在Visual Basic中有兩類過程，一類是系統(tǒng)提供的內(nèi)部函數(shù)和事件過程；另一類是用戶根據(jù)自己的需要定義的，供事件過程的多次調(diào)用。在第二類過程中，涉及最多的是子過程。它們的共同點(diǎn)都是完成某種特定功能的一組程序代碼；不同的是函數(shù)是可以直接返回值的特殊過程，所以函數(shù)過程定義時(shí)有返回值的類型說明。
兩者最大的區(qū)別就是Sub過程的過程不能直接返回值，而Function過程能直接返回值。
【考點(diǎn)鏈接】函數(shù)和過程的定義及引用。
(28) 單擊命令按鈕時(shí)，下列程序的執(zhí)行結(jié)果是
Private Sub Command1_Click()
   Dim a As Integer, b As Integer, c As Integer
   a=3
   b=4
   c=5
   Print SecProc(c, b, A)
End Sub
Function FirProc(x As Integer, y As Integer, z As Integer)
   FirProc=2 * x + y + 3 * z+2
   End Function
   Function SecProc(x As Integer, y As Integer, z As Integer)
      SecProc=FirProc(z, x, y) + x+7
   End Function
A) 20       
B) 25
C) 37       
D) 32
【命題目的】考查考生對(duì)函數(shù)調(diào)用的應(yīng)用。
【解題要點(diǎn)】此題程序代碼中用了兩層調(diào)用，我們對(duì)這樣的問題要多加小心，不能掉以輕心，千萬不要把實(shí)參和相對(duì)應(yīng)的形參弄混淆。主調(diào)過程Command1_Click輸出的是SecProc(c, b, a）的返回值，調(diào)用過程SecProc時(shí)，主調(diào)過程分別把實(shí)參c、b、a地址傳給形參x、y、z，此時(shí)在過程SecProc中，SecProc＝FirProc(a，c，b) ＋7。由此看出，程序段執(zhí)行此語句時(shí)，將調(diào)用過程FirProc。把實(shí)參a，c，b的地址分別傳給形參x、y、z，此時(shí)在過程FirProc中，F(xiàn)irProc = 2 * x + y + 3 * z+2，所以FirProc(a，c，b）＝6+4+15+2＝27，SecProc(a，c，b）＝27+3+7＝37。
【考點(diǎn)鏈接】過程的定義和調(diào)用。

(29) 有如下事件過程：
Function UNC (ByVal x As Integer, ByVal y As Integer) As Integer
   Do While y <> 0
      sic=x / y
      x=y
      y=sic
   Loop
   UNC=x
End Function
以下是該函數(shù)的調(diào)用過程，該程序的運(yùn)行結(jié)果是
Private Sub Command1_Click()
   Dim a As Integer
   Dim b As Integer
   a=12
   b=2
   x=UNC (a, b)
   Print x
End Sub
A) 0        
B) 6
C) 2        
D) 80
【命題目的】考查考生對(duì)函數(shù)的定義和調(diào)用的運(yùn)用。
【解題要點(diǎn)】本題考查函數(shù)調(diào)用和輸出格式的語句。調(diào)用UNC的過程如下：
x=12,y=2時(shí)，sic=6,x=2,y=6；
x=2,y=6時(shí)，sic=0,x=6,y=0；
y=0，所以跳出循環(huán)，輸出x＝6并結(jié)束程序。
【考點(diǎn)鏈接】過程的定義和調(diào)用。
(30) 有如下程序：
Private Sub Command1_Click()
   Dim k As Integer, m As Integer
   Dim op As Integer
   k=4: m=1
   op=PPC(k, m) : Print op;
   op=PPC (k, m) : Print op
End Sub
Private Function PPC (a As Integer, b As Integer)
   Static m As Integer, i As Integer
   m=0: i=2
   i=i + m + 1
   m=i + a + b
   PPC=m
End Function
程序運(yùn)行后，輸出的結(jié)果為
A) 4  6       
B) 6   6
C) 8  8       
D) 10  12
【命題目的】考查考生對(duì)函數(shù)及函數(shù)參數(shù)的運(yùn)用。
【解題要點(diǎn)】在Sub過程中，程序段先定義了3個(gè)Integer型變量k，m，op，并給k賦給初值4，m的初值為1，然后調(diào)用事件過程PPC，并將它的值賦給op；在事件過程PPC中定義了兩個(gè)形參，參數(shù)的傳送是通過引用實(shí)參，即將k，m的地址作為a，b的地址；在PPC中，將m，I定義為靜態(tài)變量，第一次調(diào)用后的值仍然保留，但是m，I分別都有賦值語句，將它們的值變?yōu)?，2，所以返回值不變。
【考點(diǎn)鏈接】過程的定義和調(diào)用，以及參數(shù)傳遞方式的選擇。