主题：请问foxtable有没有容错语句

Ports.Add("COM20")
Ports("COM20").Open()

如果COM20已经被其他程序所使用，那么上面的代码会出现错误提示：

显然这样的提示对于最终用户来说，是不太友好的，但是Foxtable并没有办法事先判断串口是否被其他程序占用，所以我们也无法给用户提供更友好的提示。

不过我们可以采用下面的语句捕获无法预判的错误：

Dim dr As DataRow
dr = DataTables("订单").Find("[产品] = '酱油'")
If dr IsNot Nothing
    dr("折扣") = 0.05
Else
    MessageBox.Show("没有找到符合条件的行!")
End If

和：

Try
   Dim dr As DataRow
   dr = DataTables("订单").Find("[产品] = '酱油'")
   dr("折扣") = 0.05
Catch ex As Exception
   MessageBox.Show("没有找到符合条件的行!")
End Try

无论从哪个方面来说，第一段的质量和效率都好过第二段。