AccueilCodesTutorielsForumsEmploiLivresConnexion

  • Visual Basic, VB6, VB.NET, VB 2005, VB CodeS-SourceS
  • RSS CodeS-SourceS
  • CodyxBot, le Bot GTalk & MSN qu'il vous faut !
  • Générez des revenus avec vos codes, scripts et tutoriaux
  • Aide à la navigation du site
begin process at 2009 01 08 03:23:21
Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

NOMBRE DE JOURS DANS LE MOIS


Information sur la source

Catégorie :Date & Heure Classé sous : nombre, jour, mois Niveau : Débutant Date de création : 03/04/2001 Vu : 3 964
Auteur : Nix Site perso
Ecrire un message privé
Ce membre participe au partage de revenus publicitaires
Note :
6,14 / 10 - par 7 personnes
6,14 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Commentaire sur cette source (3)
Ajouter un commentaire et/ou une note

Description

Vous donnez le mois et l'annee à la fonction et elle vous retourne le nombre de jours de celui ci
 

Source

  • Function NbJourDansMois(LeMois, LeAnnee)
  • Select Case (LeMois)
  • 'Avril, Juin, Septembre, Novembre
  • Case 4, 6, 9, 11
  • NbJourDansMois = 30
  • ' Février
  • Case 2
  • ' Si Divisible par 400 alors Bisextile
  • if (LeAnnee Mod 4 = 0) And (LeAnnee Mod 100 <> 0) Or (LeAnnee Mod 400 = 0) Then
  • NbJourDansMois = 29
  • Else
  • NbJourDansMois = 28
  • End if
  • ' Les autres mois
  • Case Else
  • NbJourDansMois = 31
  • End Select
  • End Function 
Function NbJourDansMois(LeMois, LeAnnee)
	Select Case (LeMois)
		'Avril, Juin, Septembre, Novembre
		Case 4, 6, 9, 11
			NbJourDansMois = 30
		' Février
		Case 2
			' Si Divisible par 400 alors Bisextile
			if (LeAnnee Mod 4 = 0) And (LeAnnee Mod 100 <> 0) Or (LeAnnee Mod 400 = 0) Then
				NbJourDansMois = 29
			Else
				NbJourDansMois = 28
			End if
		' Les autres mois
		Case Else
			NbJourDansMois = 31
	End Select
End Function

Conclusion

J'ai retrouvé ça dans mon grenier :)
je vais faire le menage et essayer de mettre ce que je trouve de bien :)
 

Commentaires et avis

signaler à un administrateur
Commentaire de fanny2 le 22/06/2003 19:22:31

merci beaucoup, le genre de ptits trucs qui nous épargnent bien de la peine et du temps.

signaler à un administrateur
Commentaire de FrostByte le 09/02/2004 09:52:41

SuperUtile comme fonction !!

signaler à un administrateur
Commentaire de Hoff le 27/12/2005 21:56:16

Yessss ! J'avais vraiment pas envie de réfléchir ;)

ThX !

Ajouter un commentaire

Discussions en rapport avec ce code source dans le forum

??? nombre de jour ouvré par mois ??? [ par yo1333 ] bonjour, j'aurais voulu savoir si à votre connaissance, il existait une fonction permettant de retourner le nombre de jour ouvré par mois...Donc, s'il Tableaux [ par serraj ] J&nbsp;ai besoin d&#146;automatiser un tableau qui a&nbsp;comme nombre de colonnes le nombre de jour du mois 'M' avec 5 lignes o&#249; j ai des affect Tester si mes macros de mise à jour ce sont bien déroulées [ par SLEHOUX ] Bonjour &#224; toutes et &#224; tous ,Je cherche un moyen de&nbsp;faire un rapport sur l'&#233;x&#233;cution de toutes mes macros ex&#233;cuter quotid generer tableau sous tirol (ou bien vba) [ par derek666 ] Bonjour tout le monde! J'ai un besoin urgent d'aide! Je doi generer un tableau en programmant en langage TIROL selement je ne conais pa ce langage. Co generer tableau sous tirol (ou bien vba) [ par derek666 ] Bonjour tout le monde! J'ai un besoin urgent d'aide! Je doi generer un tableau en programmant en langage TIROL selement je ne conais pa ce langage. Co 1 er jour du mois [ par micmerle ] Bonjour,Dans une petite appli de calendrier j'utilise des dates mais ca marche pas qd les param&#232;tres r&#233;gionaux ne sont pas ceux q j'attends. le nombre de fois ou un jour apparait dans une période [ par kokise ] je veux avoir le nombre de fois ou un jour apparait dans une p&#233;riode, j'ai un petit programme qui me donne le resultat exacte mais pas quand ce j Nombre de jours du mois. [ par alikote ] Je vous salue tous,Voil&#224; j'aime &#233;crire des choses en VBA (Excel et/ou Word). J'ai besoin d'une proc&#233;dure (ou m&#233;thode) ou fonction Connaitre le nombre de jour [ par dork_maule ] J'ai un champs texbox avec un date et un deuxi&#233;me textbox avec une deuxi&#233;me date.Comment peut-on faire pour connaitre le NOMBRE de jour qui


Nos sponsors

Sondage...

CalendriCode

Janvier 2009
LMMJVSD
   1234
567891011
12131415161718
19202122232425
262728293031 

Consulter la suite du CalendriCode


Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel BAÏSE, Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 1,217 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.