j=localgroupdata.Tables("GroupTable").Rows.Count()
For i = 0 To (j - 1)
Private Sub FillListbox() Dim i, j As Integer Dim localGroup As New Group() localgroupdata = localGroup.GetGroups() localGroup = Nothing j = localgroupdata.Tables("GroupTable").Rows.Count() For i = 0 To (j - 1) lstGroups.Items.Add(localgroupdata.Tables(0).Rows(i)(0)) Next lstGroups.SelectedIndex = 0 End Sub
localGroup.GetGroups()
localgroupdata
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)