[填空題] 在窗體上畫一個名稱為Command1的命令按鈕，然后編寫如下程序： Option Base 1 Private Sub Command1 Click() Dim a(10)As Integer For i = 1 To 10a(i)= i Next Call swap(______) For i=1 To 10Print a(i)； Next End Sub Sub swap(b()As Integer) n = ______ For i=1 To n/2t = b(i)b(i)= b(n)b(n)= t______ Next End Sub 上述程序的功能是：通過調(diào)用過程swap，調(diào)換數(shù)組中數(shù)值的存放位置，即a(”與a(10)的值互換，a(2)與a(9)的值互換，……，a(5)與a(6)的值互換。請?zhí)羁铡?/p>正確答案：

a()

UBound(b)或10 n=n-1 本題綜合考查數(shù)組參數(shù)的傳送以及For循環(huán)控制語句。由于建立了一個swap過程，該過程具有調(diào)換數(shù)組中數(shù)值的存放位置的功能，故在第一處調(diào)用該過程是，應把a()作為swap的參數(shù)。 For循環(huán)通過中介變量t交換數(shù)組中數(shù)值的存放位置。具體過程是，先把b(i)值賦給t，讓t儲存；隨后將b(n)值賦給b(i)，這個過程完成了數(shù)組靠后的元素與靠前的元素的交換：b(n)的值被賦給b(i)后，將接收b(i)的值，以完成數(shù)值的對調(diào)，這個過程由t對它賦值完成。據(jù)此，可以看出第二處應填數(shù)組的元素總數(shù)，即UBound(b)。UBound(b)函數(shù)返回數(shù)組 b的下標上界。由于在本程序中，只有a(10)需要調(diào)用該過程，所以第二處也可以填10。效果是一樣的。 根據(jù)上面的分析，第三處應填寫語句讓n隨著 For循環(huán)的執(zhí)行不斷的減小，而且每次減小的幅度為 1，故填：n=n-1。