已知数组a(1 To 10)As Integer,下面调用GetValue函数正确的是( )。 Private Function GetValue(a()As Integer)As Integer For i=1 To 10 Get Value=GetValue+a(i) Next i End Function

在窗体上画一个名称为Connand1的命令按钮，然后编写如下程序： Private Sub Command1_Click() Dim i As Integer, j As Integer Dim a(10, 10) As Integer For i = 1 To 3 For j = 1 To 3 a(i, j) = (i - 1) * 3 + j Print a(i, j); Next j Print Next i End Sub程序运行后，单击命令按钮，窗体上显示的是______。

在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序： Private Sub Command1_Click() Dim i As Integer，j As Integer Dim a(10， 10)As Integer For i=1 To 3 For i=1 To 3 a(i，j)=(i-1) *3+j Print a(i，j)； Next i Print Next i End Sub 程序运行后，单击命令按钮，窗体上显示的是

有以下函数过程： Function Gys (ByVal x As Integer， ByVal y As Integer) As Integer Do While y＜＞0 Reminder = x Mod y x = y y= Reminder Loop Gys=x End Function 以下是调用该函数的事件过程，该程序的运行结果是 Private Sub Command1_Click() Dim a As Integer Dim b As Integer a = 50 b = 10 x=Gys (a，B)Print x End Sub

有如下函数过程： Function Fun(By Val x As Integer，By Val y As Integer)As Integer Do While Y＜＞0 reminder=x Mod y x=y y=reminder Loop Fun=x End Function 以下调用函数的事件过程，该程序的运行结果是 Private Sub Command7_Click() Dim a As Integer，b As Integer a=100:b=25 x=Fun(a,B) Print x End Sub

有如下函数过程： Function HFC(ByVal x AS Integer，ByVal y As Integer)As Integer Do While y ＜ ＞ 0 sic=x/y X=y y=sic Loop HFC=x End Function 以下是该函数的调用过程，该程序的运行结果是 Private Sub Command1 _ Click( ) Dim a AS Integer Dim b As Integer a=12 b=2 x=HFC(a，B)Print x End Sub

有如下函数过程： Function Fun (By Val x As Ingeger, ByVal y As Integer)As Integer Do While…y＜＞0 reminder=x Mod y x=y y=reminder Loop Fun=x End Function 以下是调用该函数的事件过程，该程序的运行结果是 Private Sub Command1_Click() Dim a As Integer Dim b As Integer a=100:b=25 x=Fun(a，b)Print x End Sub

有如下函数过程： Function Fun(By Val x As Ingeger，ByVal y As Integer)As Integer Do While…Y＜＞0 reminder=x Mod Y x=y y=reminder Loop Fun=X End Function 以下是调用该函数的事件过程，该程序的运行结果是 Private Sub Command1_Click() Dim a As Integer Dim b As Integer a=100:b=25 x=Fun(a,b) Print x End Sub

已知有如下数组定义
Dim a(-3 To 6, 5, 3 To 10) As Integer
则执行语句Print LBound(a, 2); UBound(a, 2),输出的值为______。

假定一个函数的原型语句为“intff（int* x）；”，一个整型数组为a[10]，则下面函数调用表达式不正确的是（）。

某人编写了一个能够返回数组a中10个数中最大数的函数过程，代码如下： Function MaxValue(aAsInteger)As Integer Dim max％：max=1 For k=2 TO 10 If a(k)>a(max)Then max=k End lf Next k MaxValue=max End Function 程序运行时，发现函数过程的返回值是错的，需要修改，下面的修改方案中正确的是。 A．语句max=1应改为max=a(1) B．语句For k=2 TO 10应改为For k=1 TO 10 C．If语句中的条件a(k)>a(max)应改为a(k)>max D．语句MaxValue=max应改为MaxValue=a(max)

以下程序段的执行结果是 ______。 Dim a As Integer，b As Integer For a=4 To 1 Step-1 b=b+a Next a Print b， a