有如下程序:
Private Sub Commandl_Click( )
Dim i As Integer
For i=1 To 2
DS
Next i
End Sub
Sub DS( )
Dim x As Integer,m As String
Static y,n
X=X + 1
y=y + 1
m=m &"*”:n=n&"#"
Print x,y,m,n
End Sub
程序运行后,输出的结果是
A.1 1 * #
B.1 1 * #
C.1 1 * #
1 1 * # 1 2 * #
D.1 1 * #
1 1 * ## 1 2 * ##