Auf manuell erstellte Labels zugreifen

  • VB.NET
  • .NET (FX) 4.0

Es gibt 12 Antworten in diesem Thema. Der letzte Beitrag () ist von ErfinderDesRades.

    Auf manuell erstellte Labels zugreifen

    Hallo VB-Paradiser,

    ich habe verschiedene Labels und Textboxen erstellt in denen man etwas eintragen soll. Jetzt möchte ich das ganze aber speichern als .xml Datei, klappt gut bis auf die ganzen Textboxen und Labels davor. Das heißt es wird nur das Letzt LAbel, Textbox eingelesen und gespeichert. Der Code ist folgender:

    Visual Basic-Quellcode

    1. Private Sub Button3_Click(sender As System.Object, e As System.EventArgs) Handles Button3.Click
    3. LBL = New Label 'Control
    4. LBL.Name = "Lbl_" & labelname
    5. LBL.Text = ComboBox1.SelectedItem
    6. LBL.Height = 13
    7. LBL.Width = 75
    8. LBL.Left = 439
    9. LBL.Top = i
    10. '39; 13
    11. LBL.BorderStyle = 0
    12. LBL.TextAlign = 2
    13. Me.Controls.Add(LBL)
    15. labelname = labelname + 1
    17. checkbox = New CheckBox
    18. checkbox.Name = "Checkbox" & labelname
    19. checkbox.Text = ""
    20. checkbox.Left = 400
    21. checkbox.Top = i
    22. Me.Controls.Add(checkbox)
    24. i = i + 30
    26. TXT1 = New TextBox
    27. TXT1.Name = "TXT1" & labelname
    28. TXT1.Left = 600
    29. TXT1.Top = a
    30. TXT1.Text = ""
    31. TXT1.Height = 20
    32. TXT1.Width = 60
    33. TXT1Name = TXT1Name + 1
    34. Me.Controls.Add(TXT1)
    35. a = a + 30
    37. TXTx = New TextBox
    38. TXTx.Name = "TXTx" & labelname
    39. TXTx.Left = 684
    40. TXTx.Top = b
    41. TXTx.Text = ""
    42. TXTx.Height = 20
    43. TXTx.Width = 100
    44. txtxname = txtxname + 1
    45. Me.Controls.Add(TXTx)
    46. b = b + 30
    48. Lblx = New Label 'Control
    49. Lblx.Name = "Lblx_" & labelname
    50. Lblx.Text = "x"
    51. Lblx.Height = 13
    52. Lblx.Width = 12
    53. Lblx.Left = 666
    54. Lblx.Top = c
    55. '39; 13
    56. Lblx.BorderStyle = 0
    57. Lblx.TextAlign = 2
    58. Me.Controls.Add(Lblx)
    60. c = c + 30
    62. lblwdh = New Label 'Control
    63. lblwdh.Name = "Lblwdh_" & labelname
    64. lblwdh.Text = "WDH."
    65. lblwdh.Height = 13
    66. lblwdh.Width = 37
    67. lblwdh.Left = 790
    68. lblwdh.Top = d
    69. '39; 13
    70. lblwdh.BorderStyle = 0
    71. lblwdh.TextAlign = 2
    72. Me.Controls.Add(lblwdh)
    74. d = d + 30
    76. End Sub
    78. Private Sub Button4_Click(sender As System.Object, e As System.EventArgs) Handles Button4.Click
    79. Dim d As Date = Date.Today.ToString
    80. If File.Exists(Application.StartupPath & d & ".xml") = True Then
    81. File.Delete(Application.StartupPath & d & ".xml")
    82. Else
    83. File.WriteAllText(d & ".xml", LBL.Text & TXT1.Text & TXTx.Text & Lblx.Text & lblwdh.Text)
    84. End If
    86. End Sub

    @Leo&Eike Sorry, beim Betrachten Deines Codes bekommt man ja Augenkrebs.
    Verwende bitte auch beim Schreiben einen voll qualifizierten Pfad.
    Was haben Deine Ausgaben mit XML zu tun?
    Das wären bestenfalls Text-Dateien.
    Warum erstellst Du diese Controls zur Laufzeit und nicht im Designer?
    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!

    Der User wählt eine Übung aus, Bsp. Bankdrücken.
    Dann erscheint folgendes (siehe Screenshot)

    Jetzt drückt der User nachdem er weitere Übungen hinzugefügt hat und die entsprechenden Werte eingetragen hat, auf "speichern". Es soll dann alles in eine .xml Datei geschrieben werden!
    Bilder

    • Unbenannt.png

      458,95 kB, 1.600×900, 158 mal angesehen

    @Leo&Eike OK.
    Pack die einzelnen Übungen in je einen Tab eines TabControls, die kannst Du im Designer machen. Gugst Du auch hier.
    Zum Speichern und Einlesen nimm ein anständiges Format, z.B. das XML-Format.
    Was Du da oben gemacht hast, ist ein Textformat.
    Mach mal im Thread-Titel aus VB6 ein VB.NET.
    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!

    Leo&Eike schrieb:

    Und dann
    musst Du keine Controls zur Laufzeit erstellen.
    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!

    Das heißt, ich soll schon zu jeder Übung ein TabControl einrichten? 8|

    EDIT: Dein Tutorial löst bei mir nur eine Fehlermeldung nach der anderen aus, nachdem ich im Designer Form erstetzte.

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „Leo&Eike“ ()

    Wie bereits in deim anneren Thread prophezeit, bist du offensichtlich mitten im Wurstel-Prozess
    Ich kann dir nur nochmal empfehlen: Wende für eine Datenverarbeitung die für Datenverarbeitung vorgesehenen Technologien an.
    Klar musste dafür 'ne Menge lernen, aber dieses Lernen nutzt dir.
    Das Wursteln schadet dir.

    Leo&Eike schrieb:

    jeder Übung ein TabControl einrichten
    Jou.

    Leo&Eike schrieb:

    eine Fehlermeldung nach der anderen
    Welche? in welcher Zeile?
    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!

Facebook