【单选题】阅读下列程序: 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) Static b a=0 a=a+r b=b+1 H=a*b+j End Function 单击命令按钮,执行程序,输出结果是...
【单选题】有如下程序。 Private Sub Command1_Click() Dim k As Integer, m As Integer Dim op As Integer k=4: m=1 op=PPC(k, m) : Print op op=PPC(k, m) : Print op End Sub Private Function PPC(a As Integer, b As Integer) S...
【单选题】有如下的程序。 Private Sub Command1_Click() Dim k As Integer, m As Integer Dim P As Integer k=4: m=1 P=Fun(k, m) : Print P P=Fun(k, m) : Print P End Sub Private Function Fun(a As Integer, b As Integer) Stati...