Bonjour
j'ai deux questions.

1- Parmis les items dans mon combo box, il y a en a un qui est ''Nouveau''.
Quand on le choisit, il y a un input box qui nous demande de rentrer un nouveau item. J'aimerais savoir comment mettre ce nouvel élément dans mon combo box afin qu'il puisse faire partie des choix. J'arrive pas à trouver comment récupérer le dernier indice du combo box.

2- le input qui demande d'entrer le nouveau item s'affiche deux fois et je ne sais pas pour quoi.

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
44
 
 
Private Sub step2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
 
        Me.StartPosition = FormStartPosition.CenterScreen
 
 
        AddHandler cmbgrtype.SelectedIndexChanged, AddressOf onChangeLang
 
 
        Call Show_label_txtbox()
 
 
    End Sub
 
Sub onChangeLang(ByVal sender As System.Object, ByVal EvArg As EventArgs) Handles cmbgrtype.SelectedIndexChanged
 
        Dim message As String
        Dim alerte As String = ""
        Dim rep As String
        Dim test
 
        sql = "select * from Definition where DefinitionType = 'impuMsg' "
        cmd = New OleDbCommand(sql)
        dta = New OleDbDataAdapter(cmd)
        cmd.Connection() = cnx
 
 
 
        dta.Fill(dts, "Definition")
 
        dtt = dts.Tables("Definition")
 
        message = dtt.Rows(0).Item(language)
 
 
        If cmbgrtype.SelectedIndex = 1 Then
 
            rep = InputBox(message, alerte)
            cmbgrtype.Text = rep
 
        End If
 
    End Sub
votre aide serait apprécié, je suis nouveau avec vb.net.
merci d'avance.