p=p₀+ρgh是液体（）基本方程，当p<

运行以下程序后，输出结果为_____________。 Private Sub Command1_Click() a=1:b=2:c=3 Call test(a,b+3,(c)) Print "main:";a;b;c End Sub Private Function test(p,m,n) p=p+1:m=m+1:n=n+1 Print "sub:";p;m;n End Function

：A. sub:2 6 4 main:1 2 3

B. sub:2 6 4 main:2 2 3

C. sub:2 6 4 main:2 6 4

D. sub:2 6 4 main:1 6 4

A..p=p0+ρgh

B.p=p0-ρgh

C.p=ρgh

D.p=-ρgh

下面程序： Private Sub Form. _Click () Dim x, y, z As Integer x=5 y=7 z=0 Call P1(x, y, z) Print Str (z) End Sub Sub P1 (ByVal a As Integer, ByVal b As Integer , c As Integer) c= a+b End Sub 运行后的输出结果为______。

A．0

B．12

C．Str(z)

D．显示错误信息

在代码中定义了—个子过程； Sub P(a,B)… End Sub 下面______调用该过程的格式是正大确的。

A．Call P

B．Call P 10,20

C．Call P(10,20)

D．P(10,20)

设程序中有如下数组定义和过程调用语句： Dim a(10)As Integer … Call D(a) 如下过程定义巾，正确的是（ ）。

A.Private Sub p(a As Integer)

B.Private Sub p(a（ ）As Integer)

C.Private Sub p(a(10)As Integer)

D.Private Sub p(a(n)As Integer)

下列程序的执行结果是______。

PrivateFunctionP(NASInteger)

Fori=1 To N

SUM=SUM+i

Nexti

P=SUM

End Function

Privte Sub Commandl_Click()

S=P(1)+P(2)+P(3)+P(4)

Print S

End Sub

要求当鼠标在图片框P1中移动时，立即在图片框中显示鼠标的位置坐标。下面能正确实现上述功能的事件过程是

A．Private Sub P1_MouseMove(Button As Integer，Shift As Integer，x As Single，Y As Single) Print X，Y End Sub

B．Private Sub P1_M0useDown(Button As Integer，Shift As Integer，X As Single，Y As Single) Picture．Print X，Y End Sub

C．Private Sub P1_MouscMove(Button As integer，Shift As Integer，X As Single，Y As Single) P1．Print X．Y End Sub

D．Private Sub Form_MouseMove(Button As Integer，Shift As Integer，x As Single，Y As Single) P1．Print X．Y End Sub

在窗体上画一个命令按钮，然后编写如下事件过程： 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

在代码中定义了一个子过程： Sub P(a,b)...End Sub 下面 ______调用该过程的格式是正确的。

A．Call P

B．Call P 10，20

C．Call P(10，20)

D．P(10，20)