（28）阅读下列程序： Private Sub Commandl_Click（) Dim i As Integer,k As Integer k=2 For i=1 T

（28）阅读下列程序： Private Sub Commandl_Click() Dim i As Integer,k As Integer k=2 For i=1 To 3 PrintH(K)； Next i End Sub Function H(j As Integer) Static b a=0 a=a+1 b=b+1 H=a*b+jEnd Function 单击命令按钮，执行程序，输出结果是A.2 3 4 B.3 4 5 C.5 6 7 D.3 5 6

您可能感兴趣的试题

（28）阅读程序：Private Sub Commandl_Click（)Dim arrDim i As Integerarr＝Array（0，1，2, 3，4, 5，6，

答案解析
有如下程序：Option base 1Private Sub Command1_Click Dim arr（10) Arr=Array（10,35,28,90,54,68

答案解析
在窗体上画两个文本框Text1和Text2，一个命令按钮Command1，请阅读下列程序段： Private Sub Comman

答案解析
（28）下列程序的运行结果是。 Private Sub Command1_Click（) a=1.5 b=1.5 Call fun（a,b) Print a,b

答案解析
阅读程序： Sub p（b （) As Integer)For i =1To 4 b（i) = 2（iNext i End Sub Private Sub Comm

答案解析
阅读下面的程序:Private Sub Form_Click() Dim m n As Integer m=InputBox(请输入M的值) m=Val

答案解析
阅读程序: Private Sub Form. Click( ) a=0 For j=1 To 15 a=a+j Mod 3 Next j Print a End Sub

答案解析