|
Pytanie : Dlaczego Wszystkie textboxes, nakazowy guzik, combo pudełko etc… na forma:
|
|
PROBLEMOWY DESCRIPTION Disable wszystkie textboxes, commcand zapinać, comboboxes, zakładka etc…. na the form "frmProjects_NEW_VER1 " Until the użytkownik wchodzić do ono the Projekt imię i Projekt number
WHAT I TRIED I stawiać ten kod w the forma" "frmProjects_NEW_VER1" na the obciążeniowy wydarzenie i ono pracować: Dim c Gdy Kontrolny On Błąd Życiorys Next For Kontrolny c W Me.Controls c.Enabled = c.Name = "ProjectName " Next c ____________________________________
What I potrzebować? _______________________________________
To odtwarzać problem: 1. Logon 2. Zegar 'Nowy Projekt " 3. Zauważać że the użytkownik móc wszystkie informacja na the frmProjects_NEW_VER1 i OPRÓCZ bez the Projekt imię lub Projekt number.
|
|
Odpowiedź : Dlaczego Wszystkie textboxes, nakazowy guzik, combo pudełko etc… na forma:
|
Pytanie 1. I zamieniać the kod I stawiać w the DALEJ OTWARTY WYDARZENIE z: Intymny Okręt podwodny VerifyNameAndNumber () Jeżeli Len (Me.ProjectName) > (0) I Len (Me.ProjectNumber) > (0) Wtedy Ciemnawy c Kontrola Dla Me.Section c W Me.Section ((0)). Kontrola Jeżeli c.ControlType = acTextBox Lub c.ControlType = acCommandButton Wtedy 'MsgBox c.Name c.Enabled = Prawdziwy Kończyć Jeżeli Następny c Kończyć Jeżeli
Nie, ty pamiętać? I I wysyłać tutaj 33293015? Tutaj być the całkowity poczta znowu:
Bingo!
W Ten Sposób próbować to:
Intymny Okręt podwodny VerifyNameAndNumber () Jeżeli Len (Me.ProjectName) > (0) I Len (Me.ProjectNumber) > (0) Wtedy Ciemnawy c Kontrola Dla Me.Section c W Me.Section ((0)). Kontrola Jeżeli c.ControlType = acTextBox Lub c.ControlType = acCommandButton Lub c.ControlType = acCombobox Wtedy 'MsgBox c.Name c.Enabled = Prawdziwy Kończyć Jeżeli Następny c Kończyć Jeżeli
; -)
Żadny the $50,000 Dolarowy pytanie być: Móc ty móc *enable the comboboxes w the "VerifyNameAndNumber" *enable procedura?
; -)
Jeff \
|
|
|