[单选题]

以下用户自定义函数

F.unction Func(a As Integer,b As Integer) As Integer

Static m As Integer,i As Integer

m=0:i=2

i=i+m+i

m=i+a+b

F.unc=m

E.nd Function

在窗体上画一个命令按钮,然后编写如下事件过程:

Private Sub Command1_Click()

D.im k As Integer,m As Integer,p As Integer

k=4:m=1

P=Func(k,m)

Print p

E.nd Sub

程序运行后,单击命令按钮,输出结果为

A.8

B.9

C.10

D.11

参考答案与解析:

相关试题

以下用户自定义函数 Function Func(a As Integer, b

[单选题]以下用户自定义函数F.unction Func(a As Integer, b As Integer) As IntegerStatic m As Integer, i As Integerm=0:i=2i=i+m+im=i+a+bF.unc=mE.nd Function在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1D.im k As Integer, m As Integer,p As Integerk=4:m=1P=Func(k,m)Print pE.

  • 查看答案
  • 以下用户自定义函数Function Func(a As Integer,b As

    [单选题]以下用户自定义函数 Function Func(a As Integer,b As Integer)As Integer Static m As Integer.i As Integer m=0:i=2 i=i+m+i m=i+a-i-b Func=m End Function 在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim k As Integer,m As Integer,p As Integer k=4:m=1 P=Func

  • 查看答案
  • 以下用户自定义函数Function Func(a As Integer, b

    [单选题]以下用户自定义函数 Function Func(a As Integer, b As Integer) As Integer Static m As Integer, i As Integer m=0:i=2 i=i+m+i m=i+a+b Func=m End Function 在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim k As Integer,m As Integer,p As Integer k=4:m=1 P=Fun

  • 查看答案
  • (27)下列函数过程 Function Func(a As Integer,b

    [单选题](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 Func2(a As Integer,b As

    [单选题]有下列函数过程:F.unction Func2(a As Integer,b As Integer)As IntegerStaticm As Integer,i As Integerm=0i=2a=i+m+1b=i+a+bF.unc2=mE.nd Function在窗体上画一个命令按钮,然后编写下列事件过程:Private Sub Command1_Click()D.im p As Integer,k As Inmger,m As Integerk=4m=1p=Func2(k,m)Prim k;

  • 查看答案
  • 一般不需使用VBA代码的是( )。 A)创建用户自定义函数 B)创建用户自定义子

    [单选题]一般不需使用VBA代码的是( )。A.)创建用户自定义函数B.)创建用户自定义子过程C.)打开报表D.)复杂错误处理

  • 查看答案
  • 有如下的函数过程: Function Func2(a As Integer, b

    [单选题]有如下的函数过程: 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

    [单选题]若有如下的函数过程: 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

  • 查看答案
  • 自定义函数由___________函数,_______________函数,__

    [主观题]自定义函数由___________函数,_______________函数,___________________函数组成。

  • 查看答案
  • Weblet定制不包括以下哪项()A、自定义皮肤B、自定义页面布局C、自定义组件

    [单选题]Weblet定制不包括以下哪项()A.自定义皮肤B.自定义页面布局C.自定义组件D.自定义数据

  • 查看答案
  • 以下用户自定义函数Function Func(a As Integer,b As