TextBox.Text soll als Index für Radiobuttons fungieren

  • VB.NET

Es gibt 3 Antworten in diesem Thema. Der letzte Beitrag () ist von jen.

    TextBox.Text soll als Index für Radiobuttons fungieren

    Hallo,

    da ich auch nach intensiver Internetrecherche leider nicht fündig wurde, und mir dieses Forum schon einige Male helfen konnte, hoffe ich nun, dass mir hier jemand bei meinem Problem helfen kann:

    Ich habe eine Textbox (z.B. TextBox1), und beim Doppelklick darauf, wird eine Groupbox geöffnet, welche einige RadioButtons enthält (RadioButton1, RadioButton2, RadioButton3 etc.).
    Jetzt möchte ich, dass wenn in dieser TextBox1 der Wert "2" steht, dass RadioButton2 automatisch beim Öffnen der Groupbox selektiert wird.

    VB.NET-Quellcode

    1. Private Sub RedwaveSelection() Handles TextBox1.DoubleClick
    2. GroupBox1.Visible = True
    4. Dim Index As Integer = TextBox1.Text
    6. For Each c In GroupBox1.Controls
    7. If TypeOf c Is RadioButton Then
    8. If c.Name.Contains(Index) Then
    9. 'dann soll jener Radiobutton auch angehakt sein
    10. ' c.checked() //so funktioniert es jedoch nicht
    11. End If
    12. End If
    13. Next
    15. End Sub


    Vielen Dank schon mal im Voraus :)

    So in etwa:

    VB.NET-Quellcode

    1. Private Sub TextBox1_DoubleClick(sender As System.Object, e As System.EventArgs) Handles TextBox1.DoubleClick
    2. Dim tb = DirectCast(sender, TextBox)
    3. For Each rb In GroupBox1.Controls.OfType(Of RadioButton)()
    4. If rb.Name = "RadioButton" & tb.Text Then
    5. Debug.Print("Gefunden!")
    6. rb.Checked = True
    7. Exit For
    8. End If
    9. Next
    10. End Sub


    EDIT: Das Problem bei Dir: Du musst c vom Typ Control nach Typ RadioButton casten, um auf die Eigenschaften und Methoden von RadioButton zugreifen zu können
    Also: DirectCast(c, RadioButton).Checked = True

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „xtts02“ ()

Facebook
Telefonspende