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
       PrinterInstalled = True
   End If
End Function

You might also like...




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.

“Any fool can write code that a computer can understand. Good programmers write code that humans can understand.” - Martin Fowler