Déclaration de paramettre dans une Sub

Bonjour tout le monde.

Ai je le droit de poser un truc de débutant ?
Bon, on va dire que oui ! ! !

En fait, j'ai jamais fait ça et je trouve pas d'exemple.

Je monte une Sub avec un parametre qiu fait ça :

Code:

---

Optional ByVal OldEnd As Date =

---

et bien sûr il veut un truc aprés le = puisqu'il faut metre une valeur par défaut sur les Optional.

Sauf que si je mets :

Citation:

---

"01/01/1900"

---

il me dit

Citation:

---

Une conversion de 'String' en 'Date' ne peut pas avoir lieu dans une expression constante.

---

Ouaip, moi je veux bien, mais je lui mets quoi pour lui dire que la valeur par défaut c'est le 1° Janvier 1900 ?

Et donc là, je sèche, j'ai toujours des soucis avec les dates.

Merci pour votre aide.

ca fait un moment que j'ai plus fait de VB, mais peut-etre :

Citation:

---

Optional ByVal OldEnd As Date = new DateTime(1900, 1, 1)

---

Merci Philippe, ça faisait longtemps que je ne t'avais croisé, toujours un plaisir.

En fait, dans entretemps, j'avasi essayé ça et il me dit :

Citation:

---

Une expression constante est requise.

---

Et il me dit ça sur tous les essais que je fait pour créer une date.

Et je suis coincé parce qu'il faut que je mette une date par défaut, sinon, le restant de la Procédure ne fonctionne pas.

C'est vrai que les dates c'est pourri !!!

Merci pour ton aide

Code:

---

1 2	Private Sub Toto(Optional ByVal mydate As Date = #1/1/1900#) End Sub

---

Avec le format MM/dd/yyyy

Merci LuteceFalco

Ben les # fallait y penser !

Merci, ça marche super bien.

Je suppose que, ensuite, si je veux modifier le format de date, je dois jouer avec la culture au sein de procédure ?

Citation:

---

Envoyé par zooffy

Merci LuteceFalco

Ben les # fallait y penser !

Merci, ça marche super bien.

Je suppose que, ensuite, si je veux modifier le format de date, je dois jouer avec la culture au sein de procédure ?

---

Hmm, je pense que tu peux pas modifier le format à ce niveau là

Merci, je me débrouillerais quand j'en serais à la version multilingue.

après, un plan B, c'est d'avoir une date nullable, comme ca, eventuellement, on te passe null, et tu testes si ta date à une valeur, si elle n'en a pas, tu crées ta date à ce moment la ;)

Merci pour le plan B.
Question subsidiaire : comment on fait une date nullable ?
hi hi hi , je suis vraiment pas doué. Je comprends bien ce que cela peut-être juste par le nom, mais je n'ai jamais vu un truc comme ça ou alors, je ne m'en suis pas rendu compte.

rhalala, ca me rappelle le travail ;)

Code:

---

Dim t as Nullable(Of DateTime)

---

Tu peux tester si c'est null, ou tu peux faire T.HasValue pour voir si c'est nul oupas

Merci beaucoup