问题 单项选择题

下面程序的输出结果是( )
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

答案

参考答案:B

解析: Mid函数的语法格式为:Mid(字符串,p,n),功能是从位置p开始取字符串的n个字符。“&”用于连接两个字符串。在本题程序的For循环中,逐个将ch的元素倒序连接到s后,因此最后的结果为FEDCBA。

单项选择题
单项选择题