一般情况下，()应当由招标人完成。

在窗体中添加一个命令按钮,编写如下程序:

Private Sub Sub1(p,m,n)

p=p+1:m=m+1:n=n+1

Print "sub1:";p;m;n

End Sub

Private Sub Command1_Click()

a1=1:b=2:c1=3

Call Sub1(a,b1+3,c1)

Print"Main:";a1;b1;c1

End Sub

程序运行后,输出结果为

A．Sub: 2 6 4 Main: 2 6 4

B．Sub: 2 6 4 Main: 2 6 4

C．Sub: 2 6 4 Main: 1 2 3

D．Sub: 2 6 4 Main: 2 2 3

在窗体中添加一个命令按钮，编写如下程序： Private Sub Test(p，m，n) p=p+1：m=m+1：n=n+1 Print "Sub: ";p；m；n End Sub Private Sub Command1.Click() a1=1：b=2：c1=3 Call Test((a，b1+3，(c1)) Print "Main："；a1；b1；c1 End Sub 程序运行后，输出结果为

A．Sub： 2 6 4 Main： 2 6 4

B．Sub： 2 6 4 Main： 2 6 4

C．Sub： 2 6 4 Main： 1 2 3

D．Sub： 2 6 4 Main： 2 2 3

在窗体中添加一个命令按钮，编写如下程序： Private Sub Subl(p,m,n) p=p+1:m=m+1:n=n+1 Print"subl:";p;m;n End Sub Private Sub Command1_Click() al=1:b=2:c1=3 Call Subl(a,b1+3,c1) Print"Main:";a1;b1;c1 End Sub 程序运行后，输出结果为

A．Sub：2 6 4 Main：2 6 4

B．Sub：2 6 4 Main：2 6 4

C．Sub：2 6 4 Main：1 2 3

D．Sub：2 6 4 Main：2 2 3

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub sub1(p，m，n) p=p + 1 : m = m + 1 : n =n + 1 Print p;m;n End Sub Private Sub Command1_Click() x=6 : y=4 : z=2 Call sub1(x，y+1，(z)) Print x；y；z End Sub 程序运行后，单击命令按钮，则窗体上第二行显示的内容是

A．7 6 3

B．7 4 2

C．6 4 2

D．4 6 3

在窗体上画一个命令按钮，然后编写如下事件过程。 Private Sub Command1_Click() Dim m As Integer, n As Integer, p As Integer m=3: n=5:p=0 Call Y(m, n, p) Print Str(p) End Sub Sub Y(ByVal i As Integer, ByVal j As Integer, k As Integer) k=i+j End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是

A．4

B．6

C．8

D．10

在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Commandl_Click() Dim m As Integer, n As Integer, p As Integer m=3: n=5: p=0 Call Y(m, n, p) Print Str(p) End Sub Sub Y(ByVal i As Integer, ByVal j As Integer, k As Integer) k=i+j End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是()

A．4

B．6

C．8

D．10

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

Private Sub Command1_Click()

Dim m As Integer, n As Integer, p As Integer

m=3: n=5: p=0

Call Y(m, n, p)

Print Str(p)

End Sub

Sub Y(ByVal i As Integer, ByVal j As Integer, k As Integer)

k=i + j

End Sub

程序运行后,如果单击命令按钮,则在窗体上显示的内容是

A．4

B．6

C．8

D．10

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() x=5 : y=2 Call sub1((x)，y) Print x;y End Sub Private Sub sub1(m，n) t=m : m=n : n=t End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是

A．2 5

B．5 4

C．1 4

D．5 5

在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click() Dim m As Integer，n As Integer，p As Integer m=3：n=5：p=O Call Y(m，n，p) Print Str(p)End SubSub Y(ByVal i As Integer，ByVal j As Integer，k As Integer) k=i + jEnd Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是

A．4

B．6

C．8

D．10

在窗体中添加一个名称为Commandl的命令按钮，然后编写如下事件代码：

Private Sub Command1_Click()

Dim x As Integer,y As Integer

x=12：y=32

Call p(x,y)

MsgBox x*y

End Sub

Public Sub p(n As Integer,By Val m As Integer)

n=n Mod 10

m=m Mod 10

End Sub

窗体打开运行后，单击命令按钮，则消息框的输出结果为【 】。