Hallo!
Ich bin gerade am verzweifeln, wie ich mehrere Checkboxen generieren kann.
Folgende situation:
Ich habe ein RecordSet mit Werten. Diese Werte sollen als Caption den generieten Checkboxen übergeben werden.
Hier war mal mein ansatz, wobei diem positionierung natürlich erstmal schwachfug ist.
Hat jmd einen Tip?
Ich bin gerade am verzweifeln, wie ich mehrere Checkboxen generieren kann.
Folgende situation:
Ich habe ein RecordSet mit Werten. Diese Werte sollen als Caption den generieten Checkboxen übergeben werden.
Code:
Dim i As Integer
Dim CheckBox As CheckBox
i = 0
While Not rs.EOF
Set CheckBox = Me.Controls.Add("VB.Checkbox", "check" & i)
CheckBox.Move 10, 10 + (i * 5), 1000, 225
CheckBox.Visible = True
CheckBox.Caption = NZ(rs("blubb"))
i = i + 1
rs.MoveNext
Wend
rs.Close
Hier war mal mein ansatz, wobei diem positionierung natürlich erstmal schwachfug ist.
Hat jmd einen Tip?