21 lines
609 B
VB.net
21 lines
609 B
VB.net
Public Class frmBU_Mahnlauf_Ausgabe
|
|
|
|
Public AUSGABE = ""
|
|
|
|
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
|
|
Me.DialogResult = DialogResult.Cancel
|
|
Me.Close()
|
|
End Sub
|
|
|
|
Private Sub btnPDF_Click(sender As Object, e As EventArgs) Handles btnPDF.Click
|
|
AUSGABE = "PDF"
|
|
End Sub
|
|
|
|
Private Sub btnMail_Click(sender As Object, e As EventArgs) Handles btnMail.Click
|
|
AUSGABE = "MAIL"
|
|
End Sub
|
|
|
|
Private Sub btnPrint_Click(sender As Object, e As EventArgs) Handles btnPrint.Click
|
|
AUSGABE = "PRINT"
|
|
End Sub
|
|
End Class |