Hallo Kornelia
>
> > Ctl = Dlg.GetControl("ListBox5")
> > Ctl.Model.Enabled=True
> >
Oben steht "ListBox5" - an der Stelle würde ich ansetzen.
>
> Klappt super. :-) Nur müsste ich das locker mit 37 Feldern machen. Für
> die eine Option ausschalten, und beim Start des Formulars wieder
> anschalten. Nun klingt ja 37 erst einmal nicht viel, aber wenn ich dann
> je Feld 3 Zeilen benötige, sind das schon 111 Zeilen. Das stört mich
> schon. Hast Du da noch eine übersichtlichere Lösung?
Die Felder liegen in einem Formular? Dann würde ich erst einmal weiter
probieren, indem ich die Bezeichnungen so gestalte: ListBox1, ListBox2,
ListBox3 usw. - ist vielleicht schon automatisch so passiert.
i=1
WHILE i<34
Ctl = Dlg.GetControl("ListBox"+i+"")
Ctl.Model.Enabled=True
i = i+1
WEND
Mit dieser Schleife könntest Du alle auf einmal einstellen - nehme ich
jedenfalls an, habe ich so noch nicht probiert - bin auch nur
Basic-Anfänger ... Eventuell musst Du auch den Inhalt der Klammern vorher
bilden.
Gruß
Robert
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]