Counting objects in run time

Dear VB users,

How can I count all command buttons / labels / listboxes etc etc on the the form in run time?
Can give someone code?

Nice regards,

Michelle

VB Code:

Private Sub Command1_Click()
MsgBox Controls.Count
 
End Sub