Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click ' Imprimer le chart Chart1.Printing.Print(True) Dim openFileDialog1 As New OpenFileDialog() With openFileDialog1 .Filter = "PDF file (*.pdf)|*.pdf" .RestoreDirectory = True If .ShowDialog() = System.Windows.Forms.DialogResult.OK Then Try Process.Start(.FileName) Catch Ex As Exception MessageBox.Show("Cannot read file from disk. Original error: " & Ex.Message) Finally End Try End If End With End Sub