第18题: [单项选择]有如下程序:
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
程序运行后,输出的结果是( )。
参考答案:D 答案解析:当i=1时,调用函数过程DS,由于y,n为静态变量值保存,执行x =x+1;y=y + 1后x=1,y=1执行m=m &"*":n=n&"#"后,m="*",n ="#";当I=2时同上,只是y=2,