我的打印程序运行的时候,当对方没有安装打印机的时候自动停止了,请问怎么样检测打印机? rt? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 Dim Prntr As Printer dim b as boolean b = false; For Each Prntr In Printers If Prntr.Orientation = vbPRORPortrait Then Set Printer = Prntr b = true Exit For End If Next if b = false then 'no exit sub end if acropdf.dll加载控件失败 再问变态的数据库结构如何写SQL语句? 小小菜鸟刚学VB,求教Tabstrip控件如何编辑第二个界面里面的内容 有关SetWindowLong函数的问题 用ado取Excel中的数据,总是取不出来。 关于数据库操作,急用!在线等 datareport报表问题!~ 俺有的是分,只求一个完善的回答!!!(50fen) 急急急!!!高手请进!vb中删除sql server中表的记录出了问题!!! 如何定义数组常量? 请教一个sql问题(在线等待) 请问怎么设置通用对话框的默认路径?
dim b as boolean
b = false;
For Each Prntr In Printers
If Prntr.Orientation = vbPRORPortrait Then
Set Printer = Prntr
b = true
Exit For
End If
Next
if b = false then
'no
exit sub
end if