VB怎样获取默认打印机状态?

[BabySky716]

开始->设置->打印机和传真
这里系统显示了已有的打印机
我想知道默认打印机的名称，文档(现在有多少张纸没打),状态(这里有准备就绪,无法连接,脱机,卡纸)
WINDOWS能够显示的，VB里用什么可以实现
我用API函数里的GETPRINT无论是否连接打印机总是只返回0
应该怎样做，最好有现成的例子
拜谢了!

[东方之珠]

VB检测打印机状态
http://www.yisoutong.cn/Html/17/9136.html

[东方之珠]

检测打印机状态(VB实现)
http://blog.csdn.net/kylefei/archive/2006/03/31/645684.aspx

[chinaboyzyq]

[Quote=引用 2 楼 chenjl1031 的回复:]

检测打印机状态(VB实现)
http://blog.csdn.net/kylefei/archive/2006/03/31/645684.aspx
[/Quote]
up~

[BabySky716]

就是看过这个例子不明白才发帖子问的不知有没有少点的主要是知道打印机是否卡纸,是否正常工作

[东方之珠]

VB 通过MSComm控件取得打印机的状态：正常、缺纸、卡纸等
http://blog.csdn.net/wwwdbs/archive/2008/03/19/2197231.aspx

[BabySky716]

[Quote=引用 6 楼 chenjl1031 的回复:]
VB 通过MSComm控件取得打印机的状态：正常、缺纸、卡纸等
http://blog.csdn.net/wwwdbs/archive/2008/03/19/2197231.aspx
[/Quote]
这个只能捕获串口的，并口和USB无效

[东方之珠]

参考一下嘛，看别人是怎么写的。

[贝隆]

不知道API函数：
Public Declare Function PrinterProperties Lib "winspool.drv" (ByVal hwnd As Long, ByVal hPrinter As Long) As Long
能否满足你的需要，该函数可以打开打印机属性设置框

[BabySky716]

GETPRINT返回的数值始终不变的不管打印机是不是在工作