Controls.Count-Eigenschaft (Access)

Verwenden Sie die Count-Eigenschaft , um die Anzahl der Elemente in einer angegebenen Auflistung zu bestimmen. Schreibgeschützter Long-Wert.

Syntax

Ausdruck.Count

Ausdruck Eine Variable, die ein Controls-Objekt darstellt.

Beispiel

Im folgenden Beispiel wird die Count-Eigenschaft zum Steuern einer Schleife verwendet, die Informationen über alle geöffneten Formulare sowie deren Steuerelemente ausgibt.

Sub Print_Form_Controls() 
 Dim frm As Form, intI As Integer 
 Dim intJ As Integer 
 Dim intControls As Integer, intForms As Integer 
 intForms = Forms.Count ' Number of open forms. 
 If intForms > 0 Then 
 For intI = 0 To intForms - 1 
 Set frm = Forms(intI) 
 Debug.Print frm.Name 
 intControls = frm.Count 
 If intControls > 0 Then 
 For intJ = 0 To intControls - 1 
 Debug.Print vbTab; frm(intJ).Name 
 Next intJ 
 Else 
 Debug.Print vbTab; "(no controls)" 
 End If 
 Next intI 
 Else 
 MsgBox "No open forms.", vbExclamation, "Form Controls" 
 End If 
End Sub

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.