有下列函数过程：

F．unction Func2(a As Integer,b As Integer)As Integer

Staticm As Integer,i As Integer

m=0

i=2

a=i+m+1

b=i+a+b

F．unc2=m

E．nd Function

在窗体上画一个命令按钮，然后编写下列事件过程：

Private Sub Command1_Click()

D．im p As Integer,k As Inmger,m As Integer

k=4

m=1

p=Func2(k,m)

Prim k;m

p=Func2(k,m)

Print k;m

E．nd Sub

程序运行后，单击命令按钮，输出结果是( )。

A．3 6＜CR＞3 6

B．3 6＜CR＞3 11

C．3 11＜CR＞3 6

D．3 11＜CR＞3 11

[单选题]有如下的函数过程： Function Func2(a As Integer, b As Integer)'As Integer Static m As Integer, i As Integer m=0 i=2 a=i+m+1 b=i+a+b Func2=m End Function 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim p As Integer, k As Integer, m As Integer k=4 m=1

[单选题]若有如下的函数过程： Function Func2(a As Integer, b As Integer)As Integer Static m As Integer, i As Integer m=0 i=2 a=i+m+1 b=i+a+b Func2 = m End Function 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim p As Integer, k As Integer, m As Integer k=4 m=1

[单选题]（27）下列函数过程 Function Func（a As Integer,b As Integer）As Integer Static m As Integer,i As Integer M=0 i=2 A=i+m+1 b=i+a+b Func2=m End Function Private Sub Command1_Click() Dim p As Integer,k As Integer,m As Integer k=4 m=1 P=Func2(k,m) Print k;m End Sub

[单选题]有下列函数过程：Function funl(ByVal x As Integer, ByVal y As Integer) Do While y 0 Reminder=x Mody x=y y=reminder Loop Funl=xEnnd Function在下列按钮单击事件中调用该函数，则该程序的运行结果是 Privatr Sub Commandl_Click() Dim a As IntegerDim b As Integer a=100 b=25 x=funl(a,b) Print x

[单选题]有下列函数过程：Function funl(ByVal x As Integer, ByVal y As Integer) Do While y <> 0 Reminder=x Mody x=y y=reminder Loop Funl=xEnnd Function在下列按钮单击事件中调用该函数，则该程序的运行结果是 Privatr Sub Commandl_Click() Dim a As Integer Dim b As Integer a=100 b=25 x=funl(a,b

[单选题]设有以下函数过程：F．unction fun(a As Integer，b As Integer)D．im c As IntegerIf a＜b Thenc=a：a=b：b=CE．nd IFc=0D．oc=c+aLoop Until c Mod b=0fun=cE．nd Function若调用函数fun时的实际参数都是自然数，则函数返回的是（ ）。A．a、b的最大公约数B．a、b的最小公倍数C．a除以b的余数D．a除以b的商的整数部分

[单选题]设有以下函数过程：F．unction fun(a As Integer，b As Integer)D．im c As IntegerIf a<b Thene=a：a=b：b=cE．nd Ifc=0D．oc=C+aroop Until c Mod b=0fun=cE．nd Function若调用函数fun时的实际参数都是自然数，则函数返回的是A．a、b的最大公约数B．a、b的最小公倍数C．a除以b的余数D．a除以b的商的整数部分

[单选题]有下列函数过程：F．unction fun1(ByVal x As Integer,ByVal y As Integer)As IntegerD．o While y＜＞0reminder=x Mod yx=yy=reminderLoopfun1=xE．nd Function 在下列按钮单击事件中调用该函数，则该程序的运行结果是( )。Private Sub Command1_Click()D．im a As IntegerD．im b As Integera=100b=25x=fun1(a,B)

[单选题]有下列函数过程： Function fun1(ByVal x As Integer,ByVal 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 aA．0B．25C．50D．100

[单选题]（ 25 ）设有以下函数过程F．unction fun(a As Integer,b As Integer)D．im c As IntegerIf a<b Thenc=a:a=b:b=cE．nd Ifc=0D．oc=c+aLoop Until c Mod b=0fun=cE．nd function若调用函数 fun 时的实际参数都是自然数，则函数返回的是A． ） a 、 b 的最大公约数B． ） a 、 b 的最小公倍数C． ） a 除以 b 的余数D． ） a 除以 b 的商的整数部分