Dim printerName As String = "stampante"

        Dim starterStr As String = "/h /t " & Chr(34) & pdfFileName & Chr(34) & " " & Chr(34) & printerName
        Dim starter As New ProcessStartInfo("AcroRd32.exe", starterStr)
        Dim print As New Process()
        With print
            .StartInfo = starter
            .StartInfo.UseShellExecute = True
            .StartInfo.CreateNoWindow = True

            .Start()
            System.Threading.Thread.Sleep(5000)
            .WaitForInputIdle()
            .Kill()
        End With