Frage : Formatsteuerung basiert auf dem Führen des Form- und Steuernamens

Eher als, die Hintergrundfarbe in jedem Eintragungs- und Ausgangsereignis für eine ZUGANGSdatenbankform 2003 ändernd, möchte ich eine Funktion verursachen, die dies so, wenn ich die Farben ändern möchte, ich müssen es tun nur innen setzen einmal tut.  Jedoch wenn ich versuche, den Namen der Form, irgendeinen zu führen als Schnur für den Formnamen, ich, Störungen wie nicht erklärte Variable oder datatype mismatched. erhalten 
1:
2:
3:
4:
5:
6:

Public VorOnFocusColors (frmName als Form, ctlName als Steuerung)
    Formen! frmName.cltName.BackColor = 16709086
 Enden-Unterseeboot
Allgemeines VorLostFocusColors (frmName als Form, ctlName als Steuerung)
 Formen! frmName.cltName.BackColor = 16777215
Enden-Unterseeboot

Antwort : Formatsteuerung basiert auf dem Führen des Form- und Steuernamens

Ich würde verwenden, aktivieren/Ereignisse entaktiviere. Den Code sehen. Beachten, dass ich die Parameter zu den Schnüren änderte.

Lee


1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:

Allgemeines VorOnFocusColors (frmName als Schnur, ctlName als Schnur)
    Formen (frmName). Steuert (ctlName) .BackColor = vbRed
Enden-Unterseeboot
Allgemeines VorLostFocusColors (frmName als Schnur, ctlName als Schnur)
    Formen (frmName). Steuert (ctlName) .BackColor = vbBlue
Enden-Unterseeboot

Privates VorForm_GotFocus ()
    Anruf OnFocusColors (Me.Name, Text0.Name)
Enden-Unterseeboot

Privates VorForm_LostFocus ()
    Anruf LostFocusColors (Me.Name, Text0.Name)
Enden-Unterseeboot
Weitere Lösungen  
 
programming4us programming4us