Passing a control array

By | 2002-06-06

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

Original Author: VB Pro

Code

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


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

If Command1.Count < Command1.Ubound - _
Command1.Lbound + 1 Then _
Msgbox "Array not contiguous"

Author: dwirch

Derek Wirch is a seasoned IT professional with an impressive career dating back to 1986. He brings a wealth of knowledge and hands-on experience that is invaluable to those embarking on their journey in the tech industry.

Leave a Reply

Your email address will not be published. Required fields are marked *

This site uses Akismet to reduce spam. Learn how your comment data is processed.