按键精灵问题

"Event"对于整个代码来说是一个单独的部分，是不受主体影响的。

也就是说，当你启动之后代码之后，程序运行到第7行就完了，"zhenquedaan"这个变量就消失了。而你在"Event"中的"zhenquedaan"只是一个重新定义的没有赋值的新变量。

要解决这个问题有两种办法：

First

    在"Event Form1.Button1.Click"的下面加一句

"zhenquedaan = Form1.Label1.Caption * Form1.Label3.Caption"

Second

    定义环境变量，即在代码的最前面加一句

DimEnv zhenquedaan

把zhenquedaan定义成环境变量，这就可以让"zhenquedaan"在程序结束后不消失。

    不过我在改了之后发现仍然有问题，即在运行"If shurudaan = zhenquedaan Then"这一句时按键精灵并没有自动转换数据类型。

    "shurudaan"是我们通过输入框输入的，所以这是一个字符串类型；而"zhenquedaan"是运算出来的，是一个整型。

    一般来说，按键精灵会自动转换数据类型，但不知道为什么，这一句没有，可能是BUG吧。所以，我们就要自己来转换。

    可以把"shurudaan"转换成整型，即把"shurudaan"换成"CInt(shurudaan)"；也可以把“zhenquedaan”转换成字符串，即把“zhenquedaan”换成"CStr(zhenquedaan)"。

我猜，你要把所有代码都写在按钮事件里面，