有如下程序:  Private Sub Commandl_Click( )     Dim i As Integer     For i=1 To 2       DS     Next i    End Sub    Sub DS( )     Dim

admin2009-01-15  31

问题 有如下程序:  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 * ##

答案8

解析 当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)所示。
转载请注明原文地址:https://jikaoti.com/ti/Xo80FFFM
0

最新回复(0)