某耐张段架空线的百米弧垂f₁₀₀=1.5m

A、Sub f1(ByVal n%())

B、 Sub f1(%)As integer

C、 Function f1%(f1%)

D、 Function f1(ByVal n%)

设一个工程由两个窗体组成，其名称分别为Form1和Form2，在Form1上有一个名称为 Command1的命令按钮。窗体Form1的程序代码如下： Private Sub Command1_Click() Dim a As Integer a=10 Call g(Form2，A)End Sub Private Sub g(f As Form， x As Integer) y=IIf(x＞10， 100，-100) f.Show f.Caption =y End Sub 运行以上的程序，正确的结果是

A．Forml的Caption属性值为100

B．Form2的Caption属性值为-100

C．Forml的Caption属性值为-100

D．Form2的Caption属性值为100

A.Sub fib(ByRef i%())

B.Sub fib(j%) As Integer

C.Functionf%(f%)

D.Function f1!(ByValn%)

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

Private Sub f(k，s)

s=1

For j=1 To k

s=s*j

Next

End Sub

Private Sub Command1_Click()

Sum=0

For i=1 To 3

Call f(i，s)

Sum=Sum+s

Next

Print Sum

End Sub

A、施工现场架空线最大弧垂与地面的距离2m

B、施工现场架空线最大弧垂与地面的距离3m

C、施工现场架空线最大弧垂与地面的距离4m

D、施工现场架空线最大弧垂与地面的距离5m

设一个工程由两个窗体组成，其名称分别为Form1和Form2，在Form1上有一个名称为Command1的命令按钮。窗体Form1的程序代码如下： Private Sub Command1_Click( ) Dim a As Integer a=10 Call g(Form2，A ) End Sub Private Sub g(f As Form，x As Integer) y=IIf(x>10，000，-100) f．Show f．Caption=y End Sub运行以上程序，正确的结果是

A．Form1的Capdon属性值为100

B．Form2的Caption属性值为-100

C．Form1的Caption属性值为-100

D．Form2的Capdon属性值为100

下面子过程语句说明合法的是( )。

A．Function f1(By Valn%)

B．Sub f1(n%)As Integer

C．Function f1%(f1%)

D．Sub f1(ByValn%())