在VB6.0环境下，用最简单的例程说明了OnErrorTOGO的用法，方便学习和移植。