Insertion contrôle dans ListBox
Bonjour,
J'ai une solution une série de contrôle dynamique que j'ai mis en place qui se base sur un fichier .ini contenant une série de nom de PC.
Cependant, la liste a grandi et tout ne s'affiche pas dans mon formulaire.
Je souhaite donc mettre en place un scroll.
Comment puis-je procéder ?
Quel type d'objet je doit mettre sur mon form (ListBox ?) ?
Comment modifier mon code ?
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
| int_index = 0
For Each ctrl As Control In Me.Controls
If TypeOf ctrl Is GroupBox Then
Dim c As GroupBox = CType(ctrl, GroupBox)
Dim i As Integer = 0
Dim j As Integer = 0
For i = 0 To 2
rad_dyn = New RadioButton
rad_dyn.Name = "opt" & i & "_" & int_index
rad_dyn.Width = 20
rad_dyn.Height = 20
'rad_dyn.Text = tbl_poste(0)
rad_dyn.Location = New Point(posX_rad + j, 10 - 2)
c.Controls.Add(rad_dyn)
'i += 1
j += 103
Next i
End If
int_index += 1
Next |
Par avance, merci
Thierry
