This is a multi-part message in MIME format.

------=_NextPart_000_0062_01C22C22.6EBF3490
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable

All the controls might not have boderstyle property. So check for the 
type of control first before checking for the property. Something like 
this:

Private Sub Form_Load()
    Dim i As Integer
    Dim myCount As Integer
   
    For i =3D 0 To Me.Controls.count - 1
        If TypeOf Me.Controls(i) Is Label Then
            myCount =3D myCount + 1
        End If
    Next i
    MsgBox myCount
End Sub





  --- Visual C# - A Guide for VB6 Developers This book will make it easy 
to transfer your skills from Visual Basic 6 to C#, the language of 
choice of the .NET Framework. 
http://www.wrox.com/ACON11.asp?ISBN=3D1861007175&p2p0059 --- Change your 
mail options at http://p2p.wrox.com/manager.asp or to unsubscribe send a 
blank email to