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

以上不處理的情況下，你要尋找的打印機不是收藏。您需要添加邏輯來涵蓋這種情況 - 您要做的是針對您的特定任務和要求。這個例子也是一個區分大小寫的名稱搜索，所以請記住這一點。