title image


Smiley Das ist schwer allgemein zu beantworten...
ob und wieweit es sich lohnt, derartigen Code in Public Function zu packen und wie allgemein man diese halten sollte, muss man immer im Einzelfall abwägen.



Endlose Case-Fallunterscheidungen sind jedenfalls auch nicht das Gelbe vom Ei.



Ansonsten hat es sich bewährt, jeweils entweder die betroffenen Steuerelemente oder das Formular als Parameter zu übergeben, z.B.:



Im einem Modul:



Public Function EnableDisable(Frm as Form, Option DisableIt as Boolean = False)

Dim Ctl as Control

For each ctl in Frm.Controls

If Ctl.Tag = "X" then

Ctl.Enable = Not DisableIt

Ctl.Locked = DisableIt

end if

Next Ctl

end function





Aufruf dann z.B.:



Private Sub Form_Current()

EnableDisable Me, True

end sub




Gruß aus dem Norden

Reinhard


Bitte immer die Access-Version angeben


 



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: