如何在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 

以上不处理的情况下，你要寻找的打印机不是收藏。您需要添加逻辑来涵盖这种情况 - 您要做的是针对您的特定任务和要求。这个例子也是一个区分大小写的名称搜索，所以请记住这一点。