Sichern-Schaltfläche sperren

Computer: Software & Programmierung Datenbanken allgemein
#1

Ich möchte in einem Formular die Sichern-Schaltfläche sperren, solange noch nicht absolut alle Felder ausgefüllt worden sind.
Erst dann soll es möglich sein, die Felddaten komplett in eine Tabelle zu speichern. Mir fehlt hierzu der VisualBasicBefehl oder vielmehr bei welcher Aktion und wie ich die Feldinhalte auf Daten überprüfe. Dabei handelt es sich um Textfelder und ein DropDown-Menü.

mfg frank

#2

Ich möchte in einem Formular die
Sichern-Schaltfläche sperren, solange
noch nicht absolut alle Felder ausgefüllt
worden sind.
Erst dann soll es möglich sein, die
Felddaten komplett in eine Tabelle zu
speichern. Mir fehlt hierzu der
VisualBasicBefehl oder vielmehr bei
welcher Aktion und wie ich die
Feldinhalte auf Daten überprüfe. Dabei
handelt es sich um Textfelder und ein
DropDown-Menü.

Du müsstest im AfterUpdate-Ereignis des Formulars prüfen, ob alle Felder gefüllt sind. Am einfachsten geht das, wenn du die Tag(Marke)-Eigenschaft der betroffenen Felder z.B. auf „1“ setzt, und dann etwa folgende Ereignisprozeduren verwendest:

Private Sub Form\_Current()
 ' bei neuem Datensatz
 Form\_AfterUpdate
End Sub

Private Sub Form\_AfterUpdate()
Dim Ctl as control, Enb As boolean
Enb = True
For Each ctl in Me.Controls
 If Ctl.Tag = "1" then
 If NZ(Ctl.Value,"") = "" then 
 Enb = False
 Exit For
 end if
 end if
Next Ctl
Me!MeineSchaltfläche.Enabled = Enb
End Sub

Reinhard