BF₃是平面三角形而NF<sub>3</s

在通用声明中定义a，在窗体中添加一个命令按钮Command1，编写如下程序代码：

DimaAsInteger

Subtest()

a=a+1:b=b+1:c=c+1

Print"Sub:";a;"，";b;"，";c

EndSub

PrivateSubCommand1_Click()

a=2:b=3:c=4

Calltest

Calltest

EndSub

程序运行后，单击命令按钮，窗体中将显示( )

A.Sub：3，4，5Sub：4，5，6

B.Sub：2，3，4Sub：2，3，4

C.Sub：3，1，1Sub：4，1，1

D.Sub：1，1，1Sub：1，1，1

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：

Privfite Sub Command1_Click()

n=5

f=1

s=0

For i=1 To n

f=f 【 】

s=s+f

Next

Ptint S

End Sub

该事件过程的功能是计算s=1+2!+1/3!+...+1/n!的值。请填空。

布窗体上画一个名称为Command l的命令按钮，然后编写如下事件过程：

Private Sub Command l-Click ()

n=5

f=l

s=o

For I =l To n

f=f【 】

s= s +f

Next

Print s

End Sub

该事件过程的功能是计算s=1+1／2!+l+3!+…+l/ n!的值。请填空。

以下程序用于求S=1+3+32+33+…+310的值。

Private Sub Commandl_Click()

S=1

T=1

ForI=1 To 10

T=______

S=S+T

NextI

Print"S="；S

End Sub

A.pH上升

B.PaCO/sub2/supsubno上升

C.PaO/sub2/supsubno上升

D.HCO/sub3/supsubno/sup-/supsubno降低

E.HCO/sub3/supsubno/sup-/supsubno升高

运行以下程序后，输出结果为_____________。 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、Sub plus(sum, a , b ): sum = a + b: End Sub

B、Sub plus(ByVal sum , a , b ): sum = a + b: End Sub

C、Sub plus(sum , ByVal a, ByVal b ): sum = a + b: End Sub

D、Sub plus(sum , ByRef a , ByRef b ): sum = a + b: End Sub

下列过程定义语句中，形参个数为不确定数量的过程是（ ）。

A．Private Sub Pro3（x As Double,y As Single）

B．Private Sub Pro3（Arr（3）,Option x,Option y）

C．Private Sub Pro3（ByRef x,ByVal y,Arr（ ））

D．Private Sub Pro3（ParamArray Arr（ ））

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

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

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

Sub abcd(ByValn As Integer)

n=n+5

End Sub

Private Sub Form_Click()

nx%=3

Callabcd(nx%)

Printnx%

End Sub