Passing A Control Array

Passing A Control Array

Working with control arrays in VB3 was frustrating, but with VB4 youcan pass a control array as an argument to a function. Simply specify theparameter type as Variant:

 Private Sub Command1_Click(Index As Integer)	GetControls Command1()End SubPublic Sub GetControls(CArray As Variant)	Dim C As Control	For Each C In CArray		MsgBox C.Index	NextEnd Sub

Also, VB4’s control arrays have LBound, Ubound, and Count properties:

 If Command1.Count 


Share the Post: