Passing a control array
![Visual Basic 6, or VB Classic Visual Basic 6, or VB Classic](https://www.fortypoundhead.com//assets/img/icons/v7/vb6.png)
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"
Loading Comments ...
Comments
No comments have been added for this post.
You must be logged in to make a comment.