Imprimer listbox vb.net

Bonjour a tous,

je programme une application en vb.net.

Je souhaite ensuite imprimer le contenue d'une listbox. J'ai trouvé sur internet, le code suivant.

Le seule problème c'est que visual studio indique PrintDialog1 n'est pas déclaré.

Je ne sait pas comment le déclarer.

Par avance, je vous en remercie



code :

   ' Declaration de l'objet PrintDocument.
    Private WithEvents docToPrint As New Printing.PrintDocument

    ' Cette méthodes envoient les propriétés sur l'objet PrintDialog
    Private Sub Button1_Click(ByVal sender As System.Object,
        ByVal e As System.EventArgs) Handles Bimprimer.Click

        ' autorise le choix de la page d'impression
        PrintDialog1.AllowSomePages = True

        ' montre le bouton d'aide
        PrintDialog1.ShowHelp = True

        ' Fixe les propriétés du documents  (impératif)
        PrintDialog1.Document = docToPrint

        Dim result As DialogResult = PrintDialog1.ShowDialog()

        ' Si le résultat est bon on imprime
        If (result = DialogResult.OK) Then
            docToPrint.Print()
        End If

    End Sub

    ' Le PrintDialog imprimera le document en traitant l'
    'événement PrintPage du document.
    Private Sub document_PrintPage(ByVal sender As Object,
       ByVal e As System.Drawing.Printing.PrintPageEventArgs) _
           Handles DocToPrint.PrintPage

        'seul modification j'ai mis TextBox1.Text (puisque j'imprime le 'texte)
        Dim text As String = ListBox1.Text
        Dim printFont As New System.Drawing.Font _
            ("Arial", 35, System.Drawing.FontStyle.Regular)

        ' Montre le contenu
        e.Graphics.DrawString(text, printFont,
            System.Drawing.Brushes.Black, 10, 10)
    End Sub