title image


Smiley Re: Woher hast du diese Eigenschaft ??
Hi,nur das Bsp. dazu aus der MSDN:Required-Eigenschaft (Beispiel)Dieses Beispiel bestimmt mit der Required-Eigenschaft, welche Felder in drei verschiedenen Tabellen Daten enthalten müssen, damit ein neuer Datensatz hinzugefügt werden kann. Die Funktion RequiredOutput wird benötigt, um diese Prozedur auszuführen.Sub RequiredX() Dim dbsNorthwind As Database Dim tdfloop As TableDef Set dbsNorthwind = OpenDatabase("Nordwind.mdb") With dbsNorthwind ' Zeigen, welche Felder in der Fields-Auflistung ' der drei verschiedenen TableDef-Objekte benötigt werden. RequiredOutput .TableDefs("Kategorien") RequiredOutput .TableDefs("Kunden") RequiredOutput .TableDefs("Personal") .Close End WithEnd SubSub RequiredOutput(tdfTemp As TableDef) Dim fldLoop As Field ' Fields-Auflistung des angegebenen TableDef-Objekts ' durchlaufen und die Required-Eigenschaft zeigen. Debug.Print "Fields in " & tdfTemp.Name & ":" For Each fldLoop In tdfTemp.Fields Debug.Print , fldLoop.Name & ", Required = " & _ fldLoop.Required Next fldLoopEnd Sub

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: