Check if Printer is Installed

This function will return true if system as got printer installed.

Public Function PrinterInstalled() As Boolean
   On Error Resume Next
 
   Dim strDummy As String
   strDummy = Printer.DeviceName
   
   If err.Number Then
       PrinterInstalled = False
   Else
       PrinterInstalled = True
   End If
 
End Function

You might also like...

Comments

 ss

Contribute

Why not write for us? Or you could submit an event or a user group in your area. Alternatively just tell us what you think!

Our tools

We've got automatic conversion tools to convert C# to VB.NET, VB.NET to C#. Also you can compress javascript and compress css and generate sql connection strings.

“Brevity is the soul of wit” - Shakespeare