VBA msgbox语句之前的语句不执行

于半仙 · 发表于 2023-2-24 18:10

求助dalao们，最近写了个象棋的代码，是在工作表上操作的，左键双击点选棋子，右键移动，测试下来都没有问题。
后续增加了一个判定游戏结束的语句，在棋子移动后msgbox一句xx获胜，前面代码都没有改变，但是加了这个msgbox之后，前面移动棋子的代码不执行了，直接弹出对话框。
【原想法：棋子移动过去，吃掉帅或将，棋盘内容、背景色等等都按棋子移动走完，然后弹出游戏结束的对话框；实际：右键点选后，棋子移动没有执行，直接弹出了对话框】
请问这个是什么原因？应该如何修改呢？

迪尼索斯 · 发表于 2023-2-24 19:05

把dim strOver as string放首行试试

于半仙 · 发表于 2023-2-25 16:07

迪尼索斯发表于 2023-2-24 19:05
把dim strOver as string放首行试试

还是不行，棋子位置没有修改，直接弹出了对话框

高个子 · 发表于 2023-2-25 16:31

发文件上来看看

迪尼索斯 · 发表于 2023-2-25 19:46

于半仙发表于 2023-2-25 16:07
还是不行，棋子位置没有修改，直接弹出了对话框

上附件吧，只看某一段代码看不出问题来

		自动登录	找回密码
密码			免费注册

[求助] VBA msgbox语句之前的语句不执行