Mauvaise réinitialisation d'une combobox
Bonsoir,
Dans mon appli, j'ai une combobox appelée txtdocteur qui réçoit une data issue d'un fichier excel sur déclenchement d'un bouton
Voila le bout de code qui charge la combo :
Code:
1
2
3
4
5
| rng = CType(Me.xlWorkSheetOne.Cells(10, 3), Microsoft.Office.Interop.Excel.Range)
If Not txtDocteur.Items.Contains(rng.Value) Then
txtDocteur.Items.Add(rng.Value)
End If
txtDocteur.SelectedItem = (rng.Value) |
Tout fonctionne très bien
Ma sub "annuler" permet d'effacer les data dans les textbox et la combobox)
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
| Private Sub Annuler_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Annuler.Click
' annuler l'examen en cours
messageaff = "Cancellation of the consultation in progress"
infoaff = "Software information"
If MessageBox.Show(messageaff, infoaff, MessageBoxButtons.YesNo, MessageBoxIcon.Question) = DialogResult.Yes Then
Initialisecolor() 'mise a jour de la couleur des textbox
InitialisationText() 'mise "" des textbox sauf combobox
'initialisation du praticien et du patient
txtDocteur.Text = "" ' je mets à "" le contenu de la combobox
txtPRENOM.Text = "" ' je mets à "" le contenu de la textbox
txtNOM.Text = "" ' je mets à "" le contenu de la textbox
TxtNAISSANCE.Text = "" ' je mets à "" le contenu de la textbox
End If
End Sub |
Maintenant je fais un test :
je charge les data dans les textbox et dans la combobox ==> pas de souci la combobox se remplit
Je clique sur mon bouton annuler, la sub annuler() s’exécute, toutes mes textbox affichent "" ainsi que la combobox
Donc jusque la tout semble coller
Maintenant je tente de reloader exactement les mêmes datas
toutes les textbox se remplissent bien par contre la combobox reste déséspérement vide et mon beau message "please enter the customer" qui s'affiche quand :
Code:
If txtDocteur.Text = "" Then
Il y a donc un souci au second chargement de la combobox mais pas des textbox. Pourquoi d'après vous ? Faut il réinitialiser la combobox d'une autre manière ?
En C++ on met généralement l'itemIndex à -1 et le text = "" mais en vb.net j'arrive pas
Merci :roll:
