Derniers sujets
» Nos présentations d'Overclock
Mar 18 Mai - 14:23 par Misery™

» Retirer la musique au Round Win
Mar 18 Mai - 14:16 par Misery™

» Widget Steam (Gadget de bureau)
Mar 18 Mai - 14:11 par Misery™

» Configuration serveur pour les matchs DoD:Source (2010)
Mar 18 Mai - 13:55 par Misery™

» Config fps - Built 1.4.27
Mar 18 Mai - 11:37 par Misery™

» Config gamer - Built 1.6.19
Mar 18 Mai - 11:35 par Misery™

» Server admin player script
Mar 18 Mai - 11:34 par Misery™

» Petit utilitaire pour les machines un peu light
Mar 18 Mai - 11:30 par Misery™

» Autoexec
Mar 18 Mai - 10:53 par Misery™


Travailler sur le temps

Voir le sujet précédent Voir le sujet suivant Aller en bas

Travailler sur le temps

Message  Misery™ le Mar 30 Sep - 16:46

Les différents formatages de date :

d affiche le jour

dd affiche le jour sur 2 chiffres

ddd affiche le jour abrégé

dddd affiche le jour complet

M affiche le mois

MM affiche le mois sur 2 chiffres

MMM affiche le mois abrégé

MMMM affiche le mois complet

y affiche le dernier chiffre de l'année (pas très utile)

yy affiche les deux derniers chiffres de l'année

yyyy affiche l'année en entier



Vous allez pouvoir avoir quelques exemples pour vous aider...


Afficher la date du jour :

'Calculer date du jour
Dim DateduJour As System.DateTime

DateduJour = System.DateTime.Now
Label1.Text = "Date du jour : " & DateduJour


Afficher la date du jour suivant :

On va utiliser l'instruction AddDay de ToDay : AddDay, AddMouths, AddHours
et l'englober dans une instruction "Format" et non "FormatDateTime"
Simple non...


Et non pas si simple car il y a tellement de manipulations possibles avec les dates que l'on si pert. Mais j'espère vous avoir aidé pour celle-ci, car on ne la trouve pas sur le net (enfin je ne l'ai pas trouvé du moins).


'Calculer date de demain
Dim DateduJour As System.DateTime
Dim madurée As System.TimeSpan
Dim monRésultatDurée As System.DateTime

DateduJour = System.DateTime.Now
madurée = New System.TimeSpan(1, 0, 0, 0)
monRésultatDurée = DateduJour.Add(madurée)
Label1.Text = "Demain : " & Format(Today.AddDays(1), "dddd") & " " & monRésultatDurée.Day & monRésultatDurée.ToString(" MMMM yyyy")

Misery™
Admin

Nombre de messages: 70
Age: 35
Date d'inscription: 22/09/2008

Voir le profil de l'utilisateur http://maprog.etudions.net

Revenir en haut Aller en bas

Voir le sujet précédent Voir le sujet suivant Revenir en haut


Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum