未知题型
阅读下列程序: Private Sub Commad1_Click() Dim i As Integer,k As Integer k=2 For i=1 To 3 Print H(k) Next i End Sub Function H(j As Integer) a=0 Static b a=a+1 b=b+1 H=a*b+j End Function 程序运行后,单击命令按钮输出结果是
D.356
- A.234
B.345
C.567
【参考答案】
B
解析:在此题中,被调过程是一个函数过程,它有一个形式参数j,在被调过程声明中,定义了一个参数a,初值为o,一......
(↓↓↓ 点击下方‘点击查看答案’看完整答案 ↓↓↓)
点击查看答案
相关考题
-
未知题型
The proposed 'alternative funding models'(Paragraph 2) might be more clearly based onA.cost-sharing between insurers and patients.B.moderate constraints on medical budgets.C.delivering consumers' costs to tax-payers.D.generous allocations of money to hospitals.
A.cost-sharing
B.
B.moderate
C.
C.delivering
D.
D.generous -
未知题型
以下语句的输出结果是 ( ) Print Format $ (367234.'000,000,000')A.000,003.678B.003,678.23C.3678.23D.000,003.678
A.'000,000,000')
A.000,003.678
B.003,678.23
C.3678.23 -
未知题型
在窗体中添加一个命令按钮(其Name属性为Command1),然后编写如下代码: Option Base 1 Private Sub Command1_Click() Dim a a=Array(2,4,6,8) j=1 For i=4 To 1 Step-2 s=s+a(i)*j j=j*10 Next i Print 3 End Sub 运行上面的程序,单击命令按钮,其输出结果是 ( )D.48
A.2
B.4
C.8
