[单项选择题] 下面程序的输出结果是( ) Private Sub Command1

[单项选择题] 下面程序的输出结果是( )

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。