salut, je veux savoir comment rechercher des enregistrement dans un tableau sachant que ce tableau contient des textbox et des combobox. mon code :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
 
Type auto ' Nouveau type defini dans un module
 
 num As Integer
 imat As String
 dt As Date
marque As String
pane As String
employé As String * 20
 
End Type
'-----------------------------
te() as auto 
e as auto
ne as integer
 
Private Sub enregistrer_Click() 'Enregistrer les element dans un tableau
 If Text2.Text <> "" Then
        e.num = Text1.Text
        e.imat = Text2.Text + "-" + Text3.Text + "-" + Text4.Text
 
        e.dt = Text5.Text
 
        e.marque = Combo1.ListIndex
 
        e.pane = Combo2.ListIndex
    e.employé = Combo3.ListIndex
       ne = ne + 1
 
        If ne = 1 Then
            ReDim te(0)
        Else
            ReDim Preserve te(ne - 1)
        End If
 
    te(ne - 1) = e
 
 
   MsgBox ("enregistré:" & ne)
 
 
 
    End If