VB.Net Tutorial/GUI/Printers

Материал из VB Эксперт
Перейти к: навигация, поиск

Add a printer process

<source lang="vbnet">Imports System.Environment Imports System.Net

Public Class Tester

   Public Shared Sub Main
       Dim proc As New System.Diagnostics.Process()
       Dim SystemDir As String = System.Environment.SystemDirectory
       proc.Start("rundll32.exe", "shell32.dll,SHHelpShortcuts_RunDLL AddPrinter")
   End Sub

End Class</source>

Get installed printers

<source lang="vbnet">Imports System.Drawing Imports System.Drawing.Drawing2D Imports System.Windows.Forms public class GetInstalledPrinters

  public Shared Sub Main
       Dim PrinterName As String
       For Each PrinterName In System.Drawing.Printing.PrinterSettings.InstalledPrinters
           Console.WriteLine(PrinterName)
       Next
  End Sub

End class</source>