dotNETportal.cz

Mám problém se zobrazením náhledu PrintDokumentu

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        Try
            AddHandler tiskdok.PrintPage, AddressOf Me.tisktextu
            tiskdok.Print()
        Catch ex As Exception
            MessageBox.Show("Chyba při tisku")
        End Try
    End Sub
    Private Sub tisktextu(ByVal sender As Object, ByVal ev As PrintPageEventArgs)
        ev.Graphics.DrawString(Label1.Text, Label1.Font, Brushes.Black, 30, 10)
        ev.HasMorePages = False
    End Sub
    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        nahled.Document = tiskdok
        nahled.ShowDialog()
    End Sub

Proč se dokument vytiskne správně, ale v náhledu se zobrazí pouze po předchozím tisku? Kam se DrawString vykresluje, proč nestačí jen nahled.document=tiskdok?

Děkuji pomohlo to!