Code in Form Load Ereignis wird nicht vollständig ausgeführt

  • VB.NET

Es gibt 2 Antworten in diesem Thema. Der letzte Beitrag () ist von frankseipferd.

    Code in Form Load Ereignis wird nicht vollständig ausgeführt

    Hallo zusammen,

    ich habe ein Formular mit einem DatagridView erstellt.

    Im Form-Load-Ereignis initiiere ich einige Defaultwerte und lade die benötigten Table-Adapters.

    Leider wird der Code nicht komplett ausgeführt und schon an Pos 33 das Formular geöffnet.

    Das ist mein Code:

    Quellcode

    1. Private Sub frmUmsaetze_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    3. ' DataTables füllen
    4. MITGLIEDTableAdapter.Fill(DataSet.MITGLIED)
    5. LIEFERTableAdapter.Fill(DataSet.LIEFER)
    6. TblEingangsartenTableAdapter.Fill(DataSet.tblEingangsarten)
    7. TblWaehrungenTableAdapter.Fill(DataSet.tblWaehrungen)
    8. TblUmsatzartenTableAdapter.Fill(DataSet.tblUmsatzarten)
    9. tblZyklenTableAdapter.Fill(DataSet.tblZyklen)
    10. TblMehrwertsteuerTableAdapter.FillBy(DataSet.tblMehrwertsteuer, pblintVerbundgruppennummer)
    12. ' Formularinhalt abhängig von der Umsatzbasis initialisieren
    13. Select Case pblintUmsatzbasisID
    14. Case 1
    16. Text = pblstrAnwendungstitel & " - " &
    17. pblstrVerbundgruppe & " - " & pblintJahr & " -
    18. Lieferantenumsätze"
    19. TblUmsaetzePNTableAdapter.FillBy(DataSet.tblUmsaetzePN, 1, pblintJahr, pblintVerbundgruppennummer)
    20. 'DataGridView.Columns("Rechnungsdatum").Visible = False
    21. Case 2
    23. Text = pblstrAnwendungstitel & " - " &
    24. pblstrVerbundgruppe & " - " & pblintJahr & " -
    25. ZR-Umsätze"
    26. TblUmsaetzePNTableAdapter.FillBy(DataSet.tblUmsaetzePN, 2, pblintJahr, pblintVerbundgruppennummer)
    27. Case 3
    29. Text = pblstrAnwendungstitel & " - " &
    30. pblstrVerbundgruppe & " - " & pblintJahr & " -
    31. ZRR-Umsätze"
    32. TblUmsaetzePNTableAdapter.FillBy(DataSet.tblUmsaetzePN, 3, pblintJahr, pblintVerbundgruppennummer)
    33. End Select
    35. ' Defaultwerte initialisieren
    36. DataSet.tblUmsaetzePN.Columns("Jahr").DefaultValue = pblintJahr
    37. DataSet.tblUmsaetzePN.Columns("UmsatzartID").DefaultValue = 1
    38. DataSet.tblUmsaetzePN.Columns("UmsatzzyklusID").DefaultValue = 1
    39. DataSet.tblUmsaetzePN.Columns("WaehrungID").DefaultValue = 1
    40. DataSet.tblUmsaetzePN.Columns("MwStSatz").DefaultValue = 0.19
    41. DataSet.tblUmsaetzePN.Columns("EingangsartID").DefaultValue = 2


    Er steigt imm nach Position 33 aus und öffnet die Form.

    Weis jemand was ich hier für ein Problem haben könnte?

    Danke und Grüße
    Frank

    frankseipferd schrieb:

    Weis jemand was ich hier für ein Problem haben könnte?
    Da sind zwei Probleme.
    1. VisualStudio-Problem, dass beim Ausführen der Form_Load Exceptions verschluckt werden, das ist all bekannt.
    2. Du hast in Deiner Form_Load eine Exception, bei der die Ausführung Deiner Form_Load abgebrochen wird.
    Pack den Code in dei Form_Shown und kläre auf, was für eine Exception da vorliegt.
    Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
    Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch :!:
    Ein guter .NET-Snippetkonverter (der ist verfügbar).
    Programmierfragen über PN / Konversation werden ignoriert!