[填空題] 在窗體上畫一個(gè)名稱為Command1的命令按鈕，然后編寫如下程序：

Option Base 1

Private Sub Command1_Click( )

Dim a(10)As Integer

For i=1 To 10

a(i)=(i)

Next

Call swap( 【13】 )

For i=1 T0 10

Print a(i)

Next

End Sub

Sub swap(b( )As Integer)

n= 【14】

For i=1 To n/2

t=b(i)

b(i)=b(n)

b(n)=t

【15】

Next

End Sub

上述程序的功能是，通過調(diào)用過程swap，調(diào)換數(shù)組中數(shù)值的存放位置，即a(1)與a(10)的值互換；a(2)與 a(9)的值互換;……a(5)與a(6)的值互換。請?zhí)羁铡?/p>正確答案：

[13]a( ) [14]UBound(b)或10 [15]n=n-I

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