vb问题，帮忙，谢谢

Private Sub Command1_Click()
Print Text(3)

End Sub
Private Function Text(t As Integer) As Integer
Dim i As Integer
If t >= 1 Then
Call Text(t - 1)
For i = 3 To t Step -1
Print Chr(Asc("A") + i)
Next i
Print
End If
Text = t

End Function

这个程序的每句帮我解释一下好吗

还有我如果要在vb里运行 除了加命令控件 还要加什么啊 谢谢啊

我快考vb2级了

买本书 看啊

可以过得 简单的

click事件：调用Text函数，且以3为参数，最终输出结束时的text值（即为最终结束时的t）。

function语句定义了一个函数Text,并且递归调用。递归停止条件为t<1（这里t=0时结束）.每次递归输出4-t个字母（从D开始，逆序）。

执行过程：

click事件调用

text(3)

{call text(2)

{ call text(1)

{ call text(0) 输出 DCBA}

输出DCB}

输出DC}

输出D}

最后输出text的值，3

结束。

结果为

DCBA

DCB

DC

D

3

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息