fakt.

SDL/USTV/frmMDM_USTVAntrag.vb

@@ -3337,19 +3337,23 @@ Public Class frmMDM_USTVAntrag
                     Next
 
                     Dim f As New SDL.frmAbrechnungsMaskeEinzeln(item.Name, hasVZ)
-                    f.Show(Me)
+                    If f.ShowDialog(Me) = DialogResult.Cancel Then
+                        init()
+                    End If
 
                 Else
 
                     Dim hasVZ = IIf(item.Name.Contains("_VZ"), True, False)
 
                     Dim f As New SDL.frmAbrechnungsMaskeEinzeln(USTV_ANTRAG.FilialenNr, USTV_ANTRAG.AbfertigungsNr, IIf(USTV_ANTRAG.UStVAn_ErstattungsbetragEUR >= 0, "AG", "AR"), hasVZ)
-                    f.Show(Me)
+                    If f.ShowDialog(Me) = DialogResult.Cancel Then
+                        init()
+                    End If
 
                 End If
-
             End If
 
+
         End If
 
     End Sub