在VB里面怎么捕捉异常呢，请教了
我的串口程序，如果没有串口会报8002错误。然后程序会关闭，我想捕捉这个异常，不让程序关闭，该怎么做呢？
on error goto
有没有串口，用不着异常机制吧。
1.on error rusume next
放在程序头一行 有错误将继续执行.
2.如想中断处理
on error goto adress
:
:
adress:
msbox "串口未打开请开串口"
exit sub
1.on error resume next
放在程序头一行 有错误将继续执行.
2.如想中断处理
on error goto adress
:
:
adress:
msbox "串口未打开请开串口"
exit sub
VB code:
Option Explicit
Dim a As Integer
Dim blnAutoSendFlag As Boolean
Dim openFlag As Boolean
Private Sub Form_Load()
MSComm1.Settings = "9600,n,8,1"
MSComm1.InputMode = comInputModeBinary '采用二进制传输
MSComm1.InBufferCount = 0 '清空接受缓冲区
MSComm1.OutBufferCount = 0 '清空传输缓冲区
MSComm1.RThreshold = 1 '产生MSComm事件
MSComm1.InBufferSize = 1024
Shape1.FillStyle = 0
OpenPortNum
End Sub
Private Sub OpenPortNum()
On Error GoTo uerror
For a = 1 To 16
MSComm1.CommPort = a
MSComm1.PortOpen = True
If MSComm1.PortOpen = True Then
Print "可用Com号= "; a
相关问答：
比如说要在1表中的第三列第二行单元中输入“一二三”一要粗体宋体12号字，二 不要粗体 15号字 三斜体5号字
代码应该怎么打？
LZ指的是个什么表格控件呢，貌似只能设置整个表的字体，或者某几行或几列，没有单独设� ......
我想做个用vb6做的程序，可以控制GPRS MODEM拨号，如拨我自己的手机
可以啊
你先下个AT命令集合学习学习
我来顶
顶贴
LZ好厉害
不顶不行
老是排MP
引用
LZ好厉害
......
看了一些VB ini文件写入读取的方法 但是还是不知道怎么写，上面写了很长 很多，但是我不知道怎么用，我想问一下怎样写才能实现在TEXT1中写字，然后点Command1提交，然后TEXT1里面的数字就写进INI里面[Section]的Key1 ......
我写了一个软件，要用到ACCESS数据库，我再访问ACCESS的时候，我需要从表里读出一行数据，我的程序是这样写的，SQLSTRING="SELECT * from '" &ME.TEXTBOX1.TEXT &"' WHERE ID = '"& ......
本人使用的是VB6.0版本
假设有一个对象A，A内有类型为B的对象属性。现在的问题是，需要添加若干个B对象作为A对象的属性。如，
A.B1,A.B2,...
但具体添加多少个B对象作为A对象的属性则视具体情况不同而不同 ......
