vb6，我已做了串口错误处理，但生成exe后错误直接退出了
我做的一个串口通信程序，是打开程序直接打开设定的串口，我在源代码运行，错误捕获、提示都是正常的，但生成exe后如果串口不存在，先出来的是我的提示窗口，赶快点击确定的话能进程序，不点就出来windows错误提示“错误13”然后退出了，搞得我现在只好手动打开串口，哪位大侠帮帮我，不胜感激
[解决办法]
类型不匹配（错误 13）
当前 Visual Basic为了完成数据类型的赋值，能够对许多数值进行转换，而较早的版本则做不到。然而，此错误仍可能发生并且有 下列几种原因和解决方法：
变量或属性类型错误。例如，一个整型值的变量不能赋给字符串值，除非整个字符串可识别成为整型。
尽量在兼容的数据类型间赋值。例如，Integer 可以被赋给 Long，Single 可以被赋给 Double，而任何类型（除了用户类型）可以赋给 Variant。
将对象传给了需要单一属性或值的过程。
传递正确的单一属性或调用给工程的方法。
使用了表达式所要的模块或工程名称，例如：
Debug.Print MyModule
指定可以显示的表达式。
将传统 Basic 错误处理例程与拥有 Error 子类型 (10, vbError) 的 Variant 值混合，例如：
Error CVErr(n)
识别一个错误，要将其映射到 Visual Basic 或用户错误，然后产生错误。
CVErr 值不能转换成 Date。例如：
MyVar = CDate(CVErr(9))
使用 Select Case 语句或一些类似的结构映射返回的 CVErr。
在运行时，此错误通常说明在无效子类型的表达式中使用了 Variant，或 包含数组的 Variant 中出现了 Print # 语句。
可用循环显示每个元素以打印数组，。
