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.
votre aide serait apprécié, je suis nouveau avec vb.net.
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
merci d'avance.
Partager