单项选择题

阅读下列程序：
Private Sub Command1_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

<上一题目录下一题>

热门试题

单项选择题

在窗体中添加—个名称为Command1的命令按钮，然后编写如下代码： Function F(a As Integer) b=0 Static c b=b+1 C=c+1 F=a+b+c End Function Private Sub Command1_Click( ) Dim a As Integer Dim b As Integer a=2 For i=l To 3 b=F(a) Print b Next i End Sub 程序运行后，如果单击按钮，则在窗体上显示的内容是

A．4
4
4
B．4
5
6
C．5
6
7
D．5
5
5

单项选择题

在窗体中添加一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下代码： Private Sub Command1_Click( ) Dimaarray1(10，10)As Integer Dim i，j As Integer For i=1 To 3 For j=2 T0 4 Array1(i，j)=i+j Next j Next i Text1.Text=array1 (2，3)+array1(3，4) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是

A．12
B．13
C．14
D．15

相关试题