Format date dans TextBox

Bonjour tout le monde
Heureux de vous rejoindre dans ce magnifique Forum
J'ai vraiment besoin d'aide
J'enregistre le champs (Produit_Date) comme Type Text dans ma Table access.
Parfois je suis oblige d'enregistre la date (Produit_Date) uniquement comme ca .. seulement l'annee par exemple ( 2007 )
Avec mon code j'ai essaye de faire apparaitre la date dans TextBox3 de cette facon ( yyyy-MM-dd ) .. alors ca fonctionne tres bien mais le probleme lorsque j'arrive a la ligne enregistree avec une annee seulement
J'aurai ce message d'erreur ( Convertion from string "2007" to type 'date' is not valid )
Comment faire svp pour eviter ce message d'erreur
Voici mon code :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

Private Sub DataGridView1_Click(sender As Object, e As EventArgs) Handles DataGridView1.Click Try With DataGridView1.CurrentRow TextBox1.Text = .Cells("Produit_Id").Value.ToString() TextBox2.Text = .Cells("Produit_Nom").Value.ToString() TextBox3.Text = .Cells("Produit_Date").Value.ToString()   'TextBox3.Text = Format(CDate(TextBox3.Text), "yyyy-MM-dd") TextBox3.Text = Format(CDate(Convert.ToString(TextBox3.Text)), "yyyy-MM-dd")   End With Catch ex As Exception MessageBox.Show(ex.Message) End Try End Sub

---

Merci a tous
LAIDAROS

Bonjour,

Pourquoi ne testerais-tu pas le contenu de la TextBox avant de faire la conversion, par exemple :

Code:

---

1 2 3 4 5 6

If TextBox2.Text.Lenght = 10 then ' le format est peut-être correct TextBox3.Text = Format(CDate(Convert.ToString(TextBox3.Text)), "yyyy-MM-dd") Else ' le format n'est pas correct ' .... peut-être rien à faire, ou bien envoyer un message d'erreur, ou ... End If

---

Bonne journée,

Merci Phil Rob
Une meilleur idee merci
Enfin c'est resolu avec .. Else .. (yyyy)
LAIDAROS