如何捕获VB并口直接打印的错误？

Question

不通过打印驱动，直接发送数据到并口打印，在打印机没有联机的情况下，如何捕获错误，并通知用户？代码如下（打印机未联机状态下……）
....
A = "Test"         
Open "LPT1" For Output As #1
Print #1, A
Close #1
....程序进入“假死”状态，几分钟后弹出Windows系统的打印错误提示框。
我想在系统提示框出现之前，捕获该错误，并提示给用户，请问该如何修改代码。

Answer 1

虽然你用的这种方法看起来好象饶过了通过控件，但是最底层的还是API，所以直接去使用打印部分的API函数吧

Answer 2

并口的相关资料：
http://www.yesky.com/20000905/111322.shtmlhttp://www.csdn.net/cnshare/soft/16/16791.shtmhttp://www.vckbase.com/document/listdoc.asp?mclsid=9&sclsid=909http://www.chinaoak.com/download/sources/system/hardware/parallelport.ziphttp://www.skycn.com/soft/11788.htmlhttp://download.pchome.net/development/linetools/13715.html
http://www.skycn.com/sort/sort2090600_indate_DESC_1.html