Checkbox benennen

[Morlock]

Hallo Forum,
kann mir bitte jemand ein Beispiel geben wie ich vorgehen muss um mehrere Checkboxen von einem Dataset zu benennen.

Ich habe in einem DS mehrere Typen und Bereiche (Bild 1)
Bild 1.png
welche ich nach einem bestimmen Kriterium (Bild 2) auswähle.
mein aktualisiertes DS hat also dann den Inhalt von Bild 2
Bild 2.png
In einem Formular sind 10 Checkboxen diese sollen benannt, also entweder 3 oder 4, entsprechend der Daten im Dataset..
Die anderen sollen nicht angezeigt werden.

Im Voraus Herzlichen Dank

Gruß Rudi

[Christian Marquardt]

Was haben die Screenshots mit der Frage zu tun?
Wo sind da Checkboxen?
Sollen sie "benannt" werden oder "nicht angezeigt"?
https://msdn.microsoft.com/de-de/lib...v=vs.110).aspx

[Morlock]

Hallo Christian,
wahrscheinlich habe ich meine Frage etwa falsch formuliert.
Wie Du oben an den Screens lesen kannst, ist das die Schnellansicht von meinem Dataset, welches nach meiner Abfrage wie in Bild 2 aussieht.

Wie man eine Form mit Checkbocken erstellt braucht ich ja hier wohl nicht senden, daher ist der Link von Dir für mich auch nicht relevant.
Ich möchte meine Checkboxen auf einer Form dynamisch benennen, mit Hilfe des Datasets, mit den Namen der Spalte Typ.

Die Checkbocken sollen dann die Caption Eigenschaft entsprechend des ausgewählten Bereiches haben.
Also..
Wenn Bereich 1 ausgewählt, sollen diese entsprechend Bild 3 benannt werden, demnach 3 Boxen.
Bild 3.png
Alle anderen sollen nicht angezeigt werden.
Wenn Bereich 2 Ausgewählt ist müssen demnach 4 Boxen benannt werden und die anderen sind unsichtbar.

Weist Du nun was ich meine.

Rudi

[Christian Marquardt]

Wenn der Link uninteressant ist, dann weiß du offenbar wie man Checkboxen betitelt und sie disabled.

Was ist dann das Problem?
Das Dataset auslesen?

[Morlock]

Richtig
Das Dataset habe ich ausgelesen, wie Du an den ersten beiden Bilder sehen kannst.

Nun muss ich aber dieses den Boxen zuweisen.
Kannst Du mir es zeigen??

Bei einer Listbox mach ich es ZB. so... Wie mach ich es aber bei Checkboxen

  Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
    Me.ListBox1.DataSource = Me.GetDataSource()
    Me.ListBox1.DisplayMember = "Typ"
    Me.ListBox1.ValueMember = "ID"
  End Sub

  Private Function GetDataSource() As DataTable

    Dim conn = New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & Datenbank)

    Dim daTyp As OleDbDataAdapter

    Dim ds As DataSet
    Dim sql As String = "SELECT * FROM Typen WHERE Bereich=" & Bereich

    daTyp = New OleDbDataAdapter(sql, conn)
    ds = New DataSet
    daTyp.Fill(ds)
    Return ds.Tables(0)

  End Function

Rudi

[Christian Marquardt]

https://www.vb-paradise.de/index.php...64#post1037265

geschlossen