在Activate事件过程中,写入下面的程序: Prirate Sub Form_Activate() Dim S As String,a As String,b As String a="*":b="$" For i=1 To 4

admin2013-04-11  32

问题 在Activate事件过程中,写入下面的程序:    Prirate Sub Form_Activate()    Dim S As String,a As String,b As String    a="*":b="$"    For i=1 To 4    If i/2=Int(i/2) Then    S=String(Len(a)+i,b)    Else    S=String(Len(a)+i,a)    End If    Print S:    Next i    End Sub    运行程序后,显示的结果是(    )。

选项 A、$$***$$$$*****
B、*$$**$$***$$$****$$$$   
C、**$$$****$$$$$   
D、$*$$**$$$***$$$$****

答案C

解析
转载请注明原文地址:https://jikaoti.com/ti/1FO0FFFM
0

最新回复(0)