关于打印机检测 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 关于打印机检测

共有10585人关注过本帖树形打印复制链接主题：关于打印机检测

sophia

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：小狐帖子：334 积分：2722 威望：0 精华：0 注册：2010/5/20 13:07:00

关于打印机检测 发帖心情

Post By：2010/6/24 10:32:00 [只看该作者]

在专业报表中指定打印机，指定的打印机如果未打开或者不存在，想在窗口中提示：打印机未就绪。怎样实现？

Dim doc As New PrintDoc
Dim rt As New prt.RenderText
rt.Text = "Hello Foxtable"
doc.Body.Children.Add(rt)
Doc.PrinterName = "HP LaserJet 6L"
doc.Print()

狐狸爸爸

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：管理员帖子：47448 积分：251054 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2010/6/24 10:34:00 [只看该作者]

InstalledPrinters

返回一个字符串集合，包括所有已经安装的打印机的名称。

示例

在命令窗口执行下面的代码，可以列出所有已经安装的打印机名称：

For Each p As String in InstalledPrinters
Output.Show(p)
Next

至于是否打开，没有办法

下一主题 >> << 上一主题

主题：关于打印机检测