module1.bas

本程序在JAVA编程环境实现了递归下降法的一个教学演示系统,可方便理解递归下降法的全过程!

Attribute VB_Name = "Module1"
Option Explicit
Public s As Long

Public Sub Sleep()
Dim t As Long
For t = 0 To s
Next t
DoEvents
End Sub