问题
单项选择题
有如下程序: 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 * ##
答案
参考答案: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,n="##"。输出结果如选项D)所示。