Ein gecheckten RadioButton speichern?

  • VB.NET

Es gibt 12 Antworten in diesem Thema. Der letzte Beitrag () ist von MB-Tech.

    Ein gecheckten RadioButton speichern?

    Hi,

    wie schaffe ich es das ein RadioButton den ich vor dem schließen des Programms gecheckt habe das er es auch nach dem öffnen noch ist möglichts ohne das ich dies in einer externen Datei speichern muss.

    Danke schonmal im vorraus :thumbsup:

    Mfg Nazas

    setting ssind zwar auch extern, juckt dich aber wahrscheinlich nicht

    leg in den setting snen boolean speicherpunkt an

    beim schließen vom programm übergibst du die checkedvariable vom radiobutton an den speicherpunkt, beim öffnen andersherum

    Gruß vitox

    Es gibt beide Möglichkeiten du könntest vom Prinzip her alle in einem Byte speichern->Ein Speicherpunkt, ist jedoch etwas schwieriger
    Also nimm lieber 6 Bool-Werte
    Ich wollte auch mal ne total überflüssige Signatur:
    ---Leer---

    Mach doch einfach ein Array mit 6 Feldern.

    VB.NET-Quellcode

    1. Dim BoolArray(5) As Boolean
    2. BoolArray(0) = CheckBox1.Checked
    3. BoolArray(1) = CheckBox2.Checked
    4. BoolArray(2) = CheckBox3.Checked
    5. BoolArray(3) = CheckBox4.Checked
    6. BoolArray(4) = CheckBox5.Checked
    7. BoolArray(5) = CheckBox6.Checked
    9. 'In einer Schleife könntest du diese Werte dann immer abspeichern oder Laden...


    LG

    Nazas schrieb:

    MB-Tech ok und das kann ich dann auf einem Punktspeichern mit dem code von oben?

    Hier ein Beispiel:


    VB.NET-Quellcode

    1. Option Strict On
    3. Public Class Form1
    5. Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
    6. SaveBoolWerte()
    7. End Sub
    10. Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    11. LoadBoolWerte()
    12. End Sub
    15. 'LoadBoolWerte
    16. Private Sub LoadBoolWerte()
    17. 'MySetting Laden
    18. My.Settings.Reload()
    19. 'Neue Arraylist deklarieren und diese mit den Daten aus den MySettings füllen
    20. Dim werte As ArrayList = My.Settings.BoolWerte()
    21. 'Die Boolwerte aus der Liste den Boxen zuweisen
    22. CheckBox1.Checked = CBool(werte(0))
    23. CheckBox2.Checked = CBool(werte(1))
    24. CheckBox3.Checked = CBool(werte(2))
    25. CheckBox4.Checked = CBool(werte(3))
    26. CheckBox5.Checked = CBool(werte(4))
    27. CheckBox6.Checked = CBool(werte(5))
    28. End Sub
    30. 'SaveBoolWerte
    31. Private Sub SaveBoolWerte()
    32. 'Neue Arraylist deklarieren
    33. Dim werte As New ArrayList
    34. 'Boolwerte aus den Boxen der Liste hinzufügen
    35. werte.Add(CheckBox1.Checked)
    36. werte.Add(CheckBox2.Checked)
    37. werte.Add(CheckBox3.Checked)
    38. werte.Add(CheckBox4.Checked)
    39. werte.Add(CheckBox5.Checked)
    40. werte.Add(CheckBox6.Checked)
    41. 'Die Liste den MySettings übergeben
    42. My.Settings.BoolWerte = werte
    43. 'Mysettings abspeichern
    44. My.Settings.Save()
    45. End Sub
    47. End Class



    Im Anhang noch ein Bild von der Setting, die ich angelegt habe


    LG


    MB-Tech
    Bilder

    • settings.JPG

      14,44 kB, 448×49, 291 mal angesehen

    ErfinderDesRades schrieb:

    wie hast du die ArrayList in die Settings gekriegt?
    In der Liste steht ganz unten "Durchsuchen".

    Dann einfach zur ArrayList in System.Collections gehen und fertig :D

    LG

Facebook