题目内容:
下面程序的输出结果是( )
Private Sub Command1_Click()
Ch$="ABCDEF"
proc ch:Print ch
End Sub
Private Sub proc(ch As String)
s=" "
For k=Len(ch)To 1 Step-1
s=s&Mid(ch,k,1)
Next k
ch=s
End Sub
A.ABCDEF
B.FEDCBA
C.A
D.F
参考答案:
答案解析:
下面程序的输出结果是( )
Private Sub Command1_Click()
Ch$="ABCDEF"
proc ch:Print ch
End Sub
Private Sub proc(ch As String)
s=" "
For k=Len(ch)To 1 Step-1
s=s&Mid(ch,k,1)
Next k
ch=s
End Sub
A.ABCDEF
B.FEDCBA
C.A
D.F