Rem 开始a = WaitKey()If a = 65 Then Call a()End IfIf a = 66 Then Call b()End IfIf a = 67 Then Call c()End IfGoto 开始Sub a//子程序a的内容End SubSub b//子程序b的内容End SubSub c//子程序c的内容End Sub