Discussion :

[badnane2]

j'ai une listbox1 qui affiche des données de type (des dates). dans une autre listbox2 je veux afficher les même dates dans litbox1 mais à chaqu'une des dates je vais ajouter 9 mois. pour cela j'ai le code suivant:
Dim i, j As Integer

Dim x, y, As Date

For i = 0 To listbox1.Items.Count - 1

x =CDate( listbox1.Items(i))

y = x.AddMonths(9)

listbox2.Items.Add(y)

Next i

Le problème c'est que quand j'exécute j'ai le message : cast du type 'DataRowview' en type 'Date' non valide.
Pouvez vous m'aider ?

[bossun]

essaie ça

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 Dim y As Date = Date.Parse(listbox1.Items(i))

[badnane2]

d'abord il faut remplacer y par x, càd il faut écrire :

Dim x As Date = Date.Parse(listbox1.Items(i)).

Mais ça marche pas toujours. j'ai déjà posé la même question dans le forum et ya quelqu'un qui a fait un copier coller du code que j'ai proposé et ça marchait pour lui. avec moi ça marche pas toujours.

vraiment je ne sais c'est dû à quoi ? le code est tout à fait correct.

[bossun]

tu dois avoir un problem au niveau de ta listbox dans ce cas...

regarde si tu as pas un truc du genre listbox1.items(i).text ou value...

[badnane2]

non y en a pas, j'ai utilisé le code suivant sans résultat :

x =CDate( listbox1.Items(i).value)

et j'ai le message :

une exception non gérée du type 'system.Missing<memberException' s'est produite dans microsoft.visualbasic.dll
imformations supplémentaires : Le membre public 'value' du type 'DataRowView' est introuvable