Member Avatar for cguan_77

Hi,

Can anyone help me, how to determine selected control from an array of listbox? Anyhelp is greatly appreciated. Thanks.

cguan

  • 2 Contributors
  • 2 Replies
  • 101 Views
  • 1 Day Discussion Span
  • Latest Post Latest Post by cguan_77
Member Avatar for choudhuryshouvi 
'used stuffs :- list1 and its two arrays(0,1)

'displaying name along with its index of the selected control
Private Sub List1_Click(Index As Integer)
MsgBox List1(Index).Name & "(" & Index & ")"
End Sub

'dynamically adding items to all listboxes present on the current form
Private Sub Form_Load()
Dim ctlControl As Object
    On Error Resume Next
    For Each ctlControl In Me.Controls
        If TypeOf ctlControl Is ListBox Then
        ctlControl.AddItem "computer"
        DoEvents
        End If
    Next ctlControl
End Sub
Member Avatar for cguan_77

'used stuffs :- list1 and its two arrays(0,1)

'displaying name along with its index of the selected control
Private Sub List1_Click(Index As Integer)
MsgBox List1(Index).Name & "(" & Index & ")"
End Sub

'dynamically adding items to all listboxes present on the current form
Private Sub Form_Load()
Dim ctlControl As Object
On Error Resume Next
For Each ctlControl In Me.Controls
If TypeOf ctlControl Is ListBox Then
ctlControl.AddItem "computer"
DoEvents
End If
Next ctlControl
End Sub

thanks choudhuryshouvi it really works..thank you so much

Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.