更多"有如下函数： Function fun(a As Integer, "的相关试题:
[单项选择]有如下函数：
Function fun(a As Integer,n As Integer) As Integer
Dim m As Integer
While a＞=n
a＝a-n
m＝m+1
Wend
fun=m
End Function
该函数的返回值是( )
A. a乘以n的乘积
B. a加n的和
C. a减n的差
D. a除以n的商(不含小数部分)
[单项选择]有如下函数过程：
Function Fun(ByVal x As Integer,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 Command7_Click（ ）
Dim a As Integer,b As Integer
a=100:b=25
x=Fun(a,B)
Print X
End Sub
A. 0
B. 25
C. 50
D. 100
[单项选择]有如下函数过程：
Function fun1(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
fun1=x
End Function
在下列按钮单击事件中调用该函数，则该程序的运行结果是( )。
Private Sub Command1_CliCk（ ）
Dim a As Integer
Dim b As Integer
a=100
b=25
x=fun1(a，b)
Print x
End Sub
A. 0
B. 25
C. 50
D. 100
[单项选择]有如下一个函数过程：
Function Fun(a As Integer)
Stcitic C
b=0:b=b+1:c=c+1
Fu n=a+b+c
End Function
在窗体上添加一个命令按钮，事件过程如下：
Private Sub Command1_Click（ ）
Dim a As Integer
a=2
For i=1 To 3
Print Fun(A)：
Next
End Sub
运行该程序，单击命令按钮，输出结果是( )。
A. 4 4 4
B. 4 5 6
C. 6 7 8
D. 4 7 9
[单项选择]设有以下函数过程：
Function fun(a As Integer,b As Integer)
Dim c As Integer
If a＜b Then
c=a:a=b:b=c
End If
c=0
Do
c=c+a
Loop Until c Mod b=0
fun=c
End Function
若调用函数fun时的实际参数都是自然数，则函数返回的是______。
A. a、b的最大公约数
B. a、b的最小公倍数
C. a除以b的余数
D. a除以b的商的整数部分
[单项选择]设有以下函数过程
Private Function Fun(a（ ）As Integer,b As String) As Integer
End Function
若已有变量声明：
Dim x(8)As Integer,n As Integer,m As String
则下面正确的过程调用语句是______。
A. x(0)=Fun(x,"m")B) n=Fun(n,m)
B. Call Fun x, "m"D) n=Fun(x(8) ,m)
[单项选择]
设有以下函数过程
Private Function Fun（a（）As Integer，b As String）AsInteger
End Function
若已有变量声明：
Dim x（5）as Integer，n As Integer，ch As String
则下面正确的过程调用语句是（）。
A. x(0)=Fun(x, "ch")
B. n=Fun(n, ch)
C. Call Fun x, "ch"
D. n=Fun(x(5), c
[单项选择]有如下函数过程：
Function 1j(x As Integer)As Long
Dim S As Long
Dim i As Integer
s=0
For i=1 To X
s=s+i
Next i
1j=s
End Fundion
在窗体上添加一个命令按钮，名为Command1，编写事件过程调用该函数，输出结果为( )。
Private Sub Command1_Click（ ）
Dim i As Integer
For i=1 To 5
sum=sum+1j(i)
Next i
Print sum
End Sub
A. 25
B. 35
C. 45
D. 55
[单项选择]已知递归函数fun的定义如下：
int fun(int n)
if(n＜=1)return 1;//递归结束情况
else return n*fun(n-2);//递归
则函数调用语句fun(5)的返回值是( )。
A. 5
B. 12
C. 15
D. 30
[单项选择]已知递归函数fun的定义如下：
int fun(int n)
if(n＜=1)return1;//递归结束情况
else return n*fun(n-2);//递归
则函数调用语句fun(5)的返回值是( )。
A. 5
B. 12
C. 15
D. 30
[单项选择]阅读程序：
Function Fun(a As Integer)
Static C
b=0：b=b+2：c=c+2
F=a*b*c
End Function
Private Sub Command1_Click（ ）
Dim a As Integer
a=2
For i=1 To 2
Print Fun(
A. ；
B. 9 18
C. 10 20
D. 7 14
[单项选择]阅读程序：
Function Fun(a As Integer)
Static C
b=0:b=b+2:c=c+2
Fun=a*b*c
End Function
Private Sub Command1_Click（ ）
Dim a As Integer
a=2
For i=1 To 2
Print Fun(A)：
Next
End Sub
运行上面的程序，单击命令按钮，输出结果为( )。
A. 8 16
B. 9 18
C. 10 20
D. 7 14
[单项选择]设有如下函数：
fun(floatx)
x*=x++；
printf("%d/n",x)；
return(x)；
则函数的类型是______。
A. float
B. void
C. int
D. 无法确定
[单项选择]程序中对fun 函数有如下说明
void *fun（ ）;
此说明的含义是
A. fun 函数无返回值
B. fun 函数的返回值可以是任意的数据类型
C. fun 函数的返回值是无值型的指针类型
D. 指针fun 指向一个函数，该函数无返回值
