Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Selecting first and last dates of prior month
Message
De
04/03/2002 16:23:46
Jason Dalio
Northern Interior Regional Health Board
Prince George, Colombie Britannique, Canada
 
Information générale
Forum:
Visual Basic
Catégorie:
Codage, syntaxe et commandes
Titre:
Re: Selecting first and last dates of prior month
Divers
Thread ID:
00628029
Message ID:
00628069
Vues:
17
For first day of last month:

Text1.Text = DateSerial(DatePart("YYYY", Date), DatePart("m", Date) - 1, 1)

For last day of last month:

Text1.Text = DateSerial(DatePart("YYYY", Date), DatePart("m", Date), 0)

For first day of next month:

Text1.Text = DateSerial(DatePart("YYYY", Date), DatePart("m", Date) + 1, 1)

For last day of next month:

Text1.Text = DateSerial(DatePart("YYYY", Date), DatePart("m", Date) + 2, 0)
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform