Comment imprimer une date au format mm / jj / aaaa en VB
https://stackoverflow.com/questions/801156
italiano
english
français
española
中国
日本の
العربية
Deutsch
한국어
Português
RussianQuestion
Je dois imprimer la date au format mm / jj / aaaa. si la date est le 24/04/2009, la date doit être imprimée le 24/04/2009. c'est zéro remplissage est également nécessaire .. J'ai utilisé la fonction date pour obtenir la date actuelle ... mais la date prend le format m / jj / aaaa ...
La solution
Testé dans la fenêtre immédiate et travaille pour moi (sortie sous forme de commentaire)
Format(Now, "MM/dd/yyyy") '04/29/2009
Format(Date, "MM/dd/yyyy") '04/29/2009
Format(CStr(Now), "MM/dd/yyyy") '04/29/2009
Format(Date$, "MM/dd/yyyy") '04/29/2009
Format(CDate(Date), "MM/dd/yyyy")'04/29/2009
Donc, que ce soit une chaîne ou une date / heure, cela ne devrait pas avoir d'importance.
Modifier: Vu votre commentaire à Fredrik. Peu importe son apparence lorsque vous l'enregistrez dans la table de la base de données (le format de date de colonne serait une propriété de la base de données et non la responsabilité de votre programme (ou de votre vb)). Formatez simplement la valeur au fur et à mesure que vous la récupérez de la base de données.
Autres conseils
Notez que le " / " caractère dans les fonctions de formatage de date a une signification particulière, en tant que "séparateur de date". Cela signifie que je peux être remplacé par le séparateur de date pour la localisation actuelle du programme (ici en Suède, il serait remplacé par "-" par exemple). Afin de vous assurer que vous obtenez bien le " / " caractère dans la sortie, je pense que cela fonctionnerait (je n'ai pas d'installation à vérifier avec VB):
Format(date, "MM'/'dd'/'yyyy")
juste pour l'enregistrement, échapper à la barre oblique va fonctionner
Format (dt, "MM \ / jj \ / aaaa")
Essayez le code suivant:
Format(dt,"MM/dd/yyyy")
Lorsque vous entrez la date dans n'importe quel format, la valeur par défaut est convertie. Faites donc quelque chose pour modifier votre type de données date / heure en texte, cela n'affectera donc pas votre travail.
J'utilise aussi VB6 et j'ai besoin de formater la date dans mon rapport txt
cela fonctionne pour moi
Format$(Now, "yyyy-mm-dd-00.00.00")
mais seulement si je déclare la date sous forme de chaîne
strDate = Format (strDate, "aaaa-mm-jj") BillTime = Format (BillTime, "hh: mm: ss")
