Beschriftung von Bezeichnungsfeld aus DB holen

Computer: Software & Programmierung Microsoft Access
#1

Hallo,

Ich habe ein Formular mit ± 40 Kontrollkästchen, und dessen Bezeichnungsfelder tragen alle den Namen der Datenbankspalte. Da diese aber nicht sehr originell sind (1,2,3,4,5,…) kann man sich im Formular sich nicht viel darunter vorstellen. Die Namen der Felder habe ich aber in einer zweiten Tabelle abgespeichert, jetzt frage ich mich nur wie ich die beiden Sachen zusammenbekomme. Weiss wer wie?

Danke und fG,

Noel

#2

Z.B. so:

Private Sub Form\_Load()
Dim I
For I = 1 to 10
 Me("Bezeichnungsfeld" & I).Caption = DLookup("Caption","tblCaption","FeldNr = " & I)
Next I
End sub

Geht sicher noch effizienter per OpenRecordset usw.

#3

Danke! o.T.
.