一道VB题目

Question

Private Sub Command1_Click()
　　Dim str1 As String， str2 As String
　　str1＝InputBox("输入一个字符串")
　　subf str1， str2
　　Print str2
End Sub
Sub subf(s1 As String， s2 As String)
　　Dim temp As String
　　Static i As Integer
　　i＝i＋1
　　temp＝Mid(s1， i， 1)
　　If temp<>"" Then subf s1， s2
　　s2＝s2 & temp
End Sub
程序运行后，单击命令按钮Command1，且输入"abcdef"，则输出结果为(　　)。

答案为什么是 fedcba 我感觉应该是abcdef ？？

Answer 1

Sub subf(s1 As String， s2 As String)
　　Dim temp As String
　　Static i As Integer        ‘静态变量
　　i＝i＋1                        ’每次调用，i就加1
　　temp＝Mid(s1， i， 1)    ‘取第i个字符
　　If temp<>"" Then subf s1， s2    ‘若temp不空，就递归调用，因i是静态变量，故i在不断变大
　　s2＝s2 & temp            ‘把取到的字符接到后面
End Sub

要注意的是它在递归返回时才进行的连接：

追问

为什么是从后面倒着开始返回

追答

上楼梯是一、二、三、四，那么下楼梯时就必定是先下第四级，然后才是三、二、一。
因为递归是利用系统栈来实现的，而栈的特点就是“先进后出”，就是上面我们说的，最先上第一级、那么最后下的就必定是第一级。

Answer 2

subf是一个递归函数，当i=1到6的时候temp不为""，所以执行到If temp<>"" Then subf s1， s2
时就要继续执行subf函数，一直到i=7时，temp=“”，这时不用再执行下去，此时s2=s2 & temp语句是从i=7到1反过来执行了。这样得出来的结果就是fedcba