事件连续嵌套用call引用其他过程，到82次就失效了

呆叫不

大佬们好，请教一个问题如下所述。

情景：我在用Excel做个小游戏，用户用上下左右键控制，每次控制会利用selectionchange事件调用call，中断当前的过程（事件），执行一个其他过程，然后如果又有操作，则继续中断当前过程，执行另一个过程。



bug：我发现当用户每次开始游戏后，第82次操作，会失灵，导致游戏无法进行下去。这是因为嵌套的call有上限限制吗？还是说，事件里的call有这个上限？

解决方案：不管这个上限是否存在，我现在碰到的这个82次操作上限，有什么方法能够规避吗？或者说，有没有办法让过程执行call语句，且不要执行本过程call语句后面的语句，这样是不是就不会把本过程挂起了？或者还有其他什么可选方案呢？请大佬指教！感激不尽！


代码示例：我简化了代码，大体结构如下所示(临时手打，不知有无笔误，请主要关注结构）：
①工作表事件

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

x = Target.Row - key5.Row
if x>=1 then
    call down
elseif x<=-1 then
    call up
end if
end sub
②模块
sub up()
x=100
y=100
do until x=1
    ThisWorkbook.Worksheets("111").cells(x,y).interior.colorindex=1
    x=x-1
    t=timer
    do until timer-t>1
        doevents
    loop
loop
end sub
sub down()
略
end sub

呆叫不

顶一下，求大佬帮助

tanglf188

变量在用完后释放掉试试看

呆叫不

tanglf188 发表于 2022-12-4 11:57
变量在用完后释放掉试试看

你好，对象变量大多数是存在对象数组（上限100个元素）中，整个游戏过程不断需要重新赋值的，所以不存在用完的对象，这些对象只会新增和重新赋值。一个对象变量如果被重新赋值，那应该和被释放后重新赋值一样吧（个人理解）？

呆叫不

刚刚我又测试了下：
如果不用事件触发call，改为按键触发，那么按到第27次，就会死机，程序卡死。我想应该是同类原因。

呆叫不

呜呜呜 我的游戏就差这一个bug了，研究好久都没研究出来

王小雨830518

循环套了这么多层？栈满了吧

没附件很难查原因，要不给个模拟的附件