problème avec un combobox

pour numéroter les bases de données qui seront crées

Code:

---

1 2 3 4 5 6 7 8 9

Private Sub ListeModif1_Change() Text1.Text = ListeModif1.Text Text1.Refresh Text2.Refresh 'Le compteur de ListeModif1 commence à 0, Array à 1 num = ListeModif1.ListIndex + 1 Text1.Text = BD(num) Text2.Text = infosBD(num) End Sub

---

quand j'éxécute sa me met indice en déhors de la plage
merci de m'aider

Bonjour,

tu nous donnes beaucoup trop d'explications, on s'y perd...
Quand ça plante, que vaut "num", que vaut UBound(BD) et Ubound(infosBD) ? Où ces tableaux sont-ils dimensionnés ?

lorsque sa se plante "num" est égale à zéro et ListeModif1.ListIndex= -1
et BD(num) est égale a la lettre que j'ai tapé car il suffit de taper une lettre dans text1 pour que sa se plant.
merci