sub n1是你的子程序.n1就是子程序的名称.你必须用call调用,或者beginthread来启动子程序.不然子程序中的内容也不会运行!不管每个子程序的顺序是不是一样,都.

取个1到4的随机数,根据随机数的值来执行某一个子程序Randomizedo 随机数 = Int((4 * Rnd) + 1) TracePrint 随机数 If 随机数 = 1 Then Call 子程序1 ElseIf 随机数 = 2 Then Call 子程序2 ElseIf 随机数 = 3 Then Call 子程序3 ElseIf 随机数 = 4 Then Call 子程序4 End Ifloop

你的调用子程序命令“call 攻击()”与“sub 攻击()”中的“攻击()”看似一样实际不一样一个是全角字符一个是半角字符 全换成“sub 攻击()”中的“攻击()”即可运行.简单说复制攻击sub后面的的字符替换掉call后面的字符即可.祝你好运

放置一个timer控件,名称为timstop.在timstop的到时事件中写入如下代码:timstop.enabled=false call b() '要执行一次的子程序 call a() '再执行一次第一子程序 在一个button 控件的点击事件下写入如下代码:do while timstop.enabled call a() '应该循环的子程序 loop

你这种情况不是子程序反回主程序的问题,而是你的子程序2有问题,你仔细检查一下没有执行的子程序的代码.下面的代码运行完全正常Rem 开始Call 子程序1()Call 子程序2()Call 子程序3()Goto 开始Sub 子程序1()MessageBox ＂我是子程序1＂End SubSub 子程序2()MessageBox ＂我是子程序2＂End SubSub 子程序3()MessageBox ＂我是子程序3＂End Sub

好吧,我来消灭0回复:(按键版本:8.x )//支持exit sub 命令退出子程序过程 call 子程序() endscript sub 子程序() msgbox ＂我是子程序,被你调用了＂ end sub (按键版本: 7.x) gosub 子程序 endscript sub 子程序 msgbox ＂我是子程序,被你调用了＂ return 子程序 可以把“子程序”这几个字改成你想要的子程序名字

BeginThread a : BeginThread b : BeginThread c : BeginThread dWhile 1WendWhile 2WendWhile 3WendWhile 4WendSub aWhile 1KeyPress ＂A＂, 1Delay 1000WendEnd SubSub bWhile 2KeyPress ＂B＂, 1Delay 2000WendEnd SubSub cWhile 3KeyPress ＂C＂, 1Delay 3000WendEnd SubSub dWhile 3KeyPress ＂D＂, 1Delay 4000WendEnd Sub

你这样写,子程序不被调用的时候也会运行的,最好把子程序都放在代码的最下面,在之前加上EndScriptUserVarGameLevel=0EndScriptSubGameStartIfGameLevel=0MessageBox＂...＂EndIfReturn

多线程就可以了.代码如下://子程序Sub KeyPress_Key(Key, t) While True KeyPress Key, 1 Delay t WendEnd Sub//线程开启 BeginThread KeyPress_Key(49, 2000)BeginThread KeyPress_Key(53, 12000)BeginThread KeyPress_Key(56, 120000)

按键是按命令一句一句执行的.你在 Sub 喝药() 中调用 喝药() 相当于让这个子程序无限循环.所以在 Call 喝药() Call 魔法盾() 中就不可能执行到Call 魔法盾()这句.把:开头两句:Call 喝药() Call 魔法盾() 换成: ID1 = BeginThread(喝药) ID2 = BeginThread(魔法盾) 试试 好用的话别忘了给个好评