以下用户自定义函数Function Func(a As Integer，b As Integer) As IntegerStatic m As Integer，i As Integerm=0:i=2i=i+m+im=i+a+bFunc=mEnd Function在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim k As Integer，m As Integer，p As Integerk=4:m=1P=Func(k,m)Print pEnd Sub程序运行后，单击命令按钮，输出结果为A．8B．9C．10D．11
以下用户自定义函数
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=Func(k,m)
Print p
End Sub
程序运行后，单击命令按钮，输出结果为
A．8
B．9
C．10
D．11
相关考题：
如果Add函数的调用代码为:func main() {var a Integer = 1var b Integer = 2var i interface{} = asum := i.(Integer).Add(b)fmt.Println(sum)}则Add函数定义正确的是() A.type Integer intfunc (a Integer) Add(b Integer) Integer { return a + b}B.type Integer intfunc (a Integer) Add(b *Integer) Integer { return a + *b}C.type Integer intfunc (a *Integer) Add(b Integer) Integer { return *a + b}D.type Integer intfunc (a *Integer) Add(b *Integer) Integer { return *a + *b}
以下所列的各函数首部中，正确的是______。A．void play(var a：Integer,var b：Integer)B．void play(int a,b)C．void play(int a,int b)D．Sub play(a as integer,b as integer)
链表的定位函数loc(I:integer):pointer; {寻找链表中的第I个结点的指针}procedure loc(L:linklist; I:integer):pointer;var p:pointer;j:integer;
以下哪个函数声明是正确的？A．void play(int a, int b)；B．void play(a:Integer, b:Integer)；C．void play(int a, b) ；D．Sub play(a as integer, b as integer)；
定义一个List对象list，使用ArrayList的构造方法进行初始化，并且要求list中必须全部存放Integer类型的对象，以下语句正确的是（）。A．List list = new ArrayList＜Integer＞();B．List list = new ArrayList ();C．List＜Integer＞ list = new ArrayList＜Integer＞();D．ArrayList＜Integer＞ list = new List＜Integer＞();
定义一个List对象list，使用ArrayList的构造方法进行初始化，并且要求list中必须全部存放Integer类型的对象，以下语句正确的是（）。A．List list = new ArrayList ();B．List list = new ArrayList＜Integer＞();C．ArrayList＜Integer＞ list = new List＜Integer＞();D．List＜Integer＞ list = new ArrayList＜Integer＞();
8、下面哪些是将分数化为浮点数的正确定义？A.type Fraction = (Integer, Integer) rateq :: Fraction - Float rateq (a,b) = a/b###SXB###B.type Fraction = (Integer, Integer) rateq :: Fraction - Float rateq (a,b) = (fromInteger a)/ (fromInteger b)###SXB###C.type Fraction = (Integer, Integer) rateq :: Fraction - Float rateq (a,b) = fromInteger (a/b)###SXB###D.type Fraction = (Integer, Integer) rateq :: Fraction - Float rateq (a,b) = (fromIntegral a)/ (fromIntegral b)###SXB###E.ty
定义一个List对象list，使用ArrayList的构造方法进行初始化，并且要求list中必须全部存放Integer类型的对象，以下语句正确的是（）。A．List list = new ArrayList ();B．List list = new ArrayList＜Integer＞();C．List＜Integer＞ list = new ArrayList＜Integer＞();D．ArrayList＜Integer＞ list = new List＜Integer＞();
11、下面哪些定义是类型正确的？A．f :: (Integer, Integer) - Float f (x,y) = x / yB．f :: (Integer, Integer) - Float f (x,y) = (fromInteger x) / (fromInteger y)C．f :: (Integer, Integer) - Float f (x,y) = 3*x + yD．f :: (Integer, Integer) - Integer f (x, y) = 3*x + y