Contextual Guidance at the moment of need helps your employees adopt to new software or processes instantly. Boost knowledge retention and employee engagement step-by-step with one easy solution.
Private Sub PrintExcel() Dim PrintDialog1 As New PrintDialog() Dim clsFrmain As New ClsFrmMainLoad Dim result As DialogResult = PrintDialog1.ShowDialog() If (result = DialogResult.OK) Then Dim strFile As String = StrExcelLocation Dim objProcess As New System.Diagnostics.ProcessStartInfo Dim strPrnterName As String = StrPrinterName With objProcess strFile = clsFrmain.ReturnPrintFilePath() .FileName = strFile .WindowStyle = ProcessWindowStyle.Hidden .Verb = "printTo" .Arguments = PrintDialog1.PrinterSettings.PrinterName .CreateNoWindow = True .UseShellExecute = True End With Try System.Diagnostics.Process.Start(objProcess) Catch ex As Exception MessageBox.Show(ex.Message) End Try End If End Sub
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
|Trying to Create FTP Client in VB.net - getting errors||3||36|
|How to set the "Time Stamp" property for TFS workspace in Visual Studio 2013||2||51|
|SSIS Column mapping||5||40|
|How do I "share" on social sites?||2||38|
Join the community of 500,000 technology professionals and ask your questions.