如何在 VB 中创建打印机对象

Question

在创建打印机对象时，我在 VB 6 中遇到了问题。 基本上，我需要创建一个打印机对象，以便我可以设置需要执行打印的正确托盘。

我有打印机名称。

我能在网上找到的所有代码都涉及遍历所有可用的打印机并找到与我们的打印机名称匹配的内容。

有没有一种方法可以直接从打印机名称创建打印机对象 prn。

任何帮助将不胜感激。

Answer 1

你不能。 VB6 打印机集合只能通过索引而不是名称访问。见Visual Studio 6 Printer Object, Printers Collection。

因此，您必须在集合中搜索您想要的打印机。例如：

Private Function FindPrinter(PrinterName As String) As Printer
  Dim i As Integer
  For i = 0 To Printers.Count - 1
    If Printers(i).DeviceName = PrinterName Then
      Set FindPrinter = Printers(i)
      Exit For
    End If
  Next i
  Exit Function
End Function

以上内容不处理您要查找的打印机不在集合中的情况。您需要添加逻辑来涵盖该条件 - 您想要做的是特定于您的特定任务和要求。此示例也是区分大小写的名称搜索，因此请记住这一点。