Печать в vb5

[Таня.Ку]

Привет всем!Я первый раз решила вывести на печать документ и столкнулась с такой проблемой: Он печатает,но выводит чистый лист. Мне надо распечатать RichTextBox1, PictureBox1, TextBox1, TextBox2, TextBox3, TextBox4 вот код.

   Sub A(ByVal RichTextBox1, ByVal PictureBox1, ByVal TextBox1, ByVal TextBox2, ByVal TextBox3, ByVal TextBox4)
        PrintDocument1.Print()
    End Sub
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Call A(RichTextBox1, PictureBox1, TextBox1, TextBox2, TextBox3, TextBox4)
       
    End Sub