单项选择题

阅读下列程序：
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
程序运行后，单击命令按钮输出结果是

A．234
B．345
C．567
D．356
<上一题 目录 下一题>
热门 试题

单项选择题
设有如下程序： Private Sub Form_Click() A=1 For i＝1 To 3 Select Case i Case 1,3 A＝A+1 Case 2,4 A＝A+2 End Select Next i Print A End Sub 程序运行后，单击窗体，则在窗体上显示的内容是
A．6
B．5
C．4
D．3
单项选择题
有如下语句： Type Student Name As String Age As Integer Sex As String End Type Dim Stu As Student With Stu .Name＝ 张红 .Age＝22 .Sex＝ 女 End With 执行Print Stu.Age语句后的结果是
A．张红
B．22
C．“女”
D．Age
相关试题