ZUGFeRDTest: update gui
This commit is contained in:
parent
15bd116a64
commit
c833f486ac
@ -105,10 +105,13 @@ Public Class Form1
|
|||||||
Dim oArgs As New WorkerArgs()
|
Dim oArgs As New WorkerArgs()
|
||||||
|
|
||||||
If oResult = DialogResult.OK Then
|
If oResult = DialogResult.OK Then
|
||||||
Dim oDoc = _zugferd.ValidateZUGFeRDFileWithGDPicture(OpenFileDialog1.FileName)
|
Try
|
||||||
Dim oZUGFERD = _zugferd.SerializeZUGFeRDDocument(oDoc)
|
Dim oDoc = _zugferd.ValidateZUGFeRDFileWithGDPicture(OpenFileDialog1.FileName)
|
||||||
Console.WriteLine()
|
Dim oZUGFERD = _zugferd.SerializeZUGFeRDDocument(oDoc)
|
||||||
|
Console.WriteLine()
|
||||||
|
Catch ex As Exception
|
||||||
|
MsgBox(ex.Message)
|
||||||
|
End Try
|
||||||
End If
|
End If
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
|
|||||||
Loading…
x
Reference in New Issue
Block a user