begin process at 2012 02 16 15:21:16
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Date & Heure

 > SAVOIR SI L'ON A AFFAIRE À UNE HEURE APRES UN ISDATE()

SAVOIR SI L'ON A AFFAIRE À UNE HEURE APRES UN ISDATE()


 Information sur la source

Note :
8,5 / 10 - par 2 personnes
8,50 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Date & Heure Classé sous :validite, heure, isdate Niveau :Débutant Date de création :23/07/2000 Vu / téléchargé :4 287 / 341

Auteur : TomAmplius

Ecrire un message privé
Commentaire sur cette source (0)
Ajouter un commentaire et/ou une note

 Description

Cette fontion permet de verifier la validité d'une Heure. Et elle permet de differencier une date d'une heure, car isdate() qui ne fait pas la différence.

Source

  • Dim Second_Temp As Integer
  • Dim Minute_Temp As Integer
  • Dim Heure_Temp As Integer
  • 'Pour verifier qu'une heure est valide
  • Private Function IsTime(ByRef Heure As String)
  • IsTime = False
  • Second_Temp = Val(Right(Heure, 2))
  • Minute_Temp = Val(Mid(Heure, 4, 2))
  • Heure_Temp = Val(Left(Heure, 2))
  • If Second_Temp < 60 And Minute_Temp < 60 And Heure_Temp < 24 And Heure = Format(Heure_Temp, "0#") & ":" & Format(Minute_Temp, "0#") & ":" & Format(Second_Temp, "0#") Then IsTime = True
  • End Function
Dim Second_Temp As Integer
Dim Minute_Temp As Integer
Dim Heure_Temp As Integer

'Pour verifier qu'une heure est valide
Private Function IsTime(ByRef Heure As String)
IsTime = False
Second_Temp = Val(Right(Heure, 2))
Minute_Temp = Val(Mid(Heure, 4, 2))
Heure_Temp = Val(Left(Heure, 2))
If Second_Temp < 60 And Minute_Temp < 60 And Heure_Temp < 24 And Heure = Format(Heure_Temp, "0#") & ":" & Format(Minute_Temp, "0#") & ":" & Format(Second_Temp, "0#") Then IsTime = True
End Function 


 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip


 Sources du même auteur

AJOUTER UN ZÉRO DEVANT UN CHIFFRE
MINIMUM ET MAXIMUM
HORREUR DES ERREUR DE DIVISION PAR 0
Source avec Zip INSTRUCTION DELAY SANS GETTICKCOUNT NI OBJECT TIMER
Source avec Zip SAVOIR SI UN NOMBRE EST PREMIER !!!

 Sources de la même categorie

Source avec Zip Source avec une capture LES FONCTIONS DATE PAR L'EXEMPLE. par pasquet78
Source avec Zip Source avec une capture CALENDRIER, MODE D'EMPLOI par pasquet78
Source avec Zip Source avec une capture Source .NET (Dotnet) HORLOGE DIODE AVEC 3 ALARMES ET REMISE À L'HEURE par EhJoe
Source avec Zip Source avec une capture POINTEUSE HORAIRES PAR SEMAINE par VBNoob13
Source avec Zip Source avec une capture HORLOGE À AIGUILLES SIMPLEMENT DANS UN USERFORM EXCEL par bigbe

 Sources en rapport avec celle ci

Source avec Zip Source avec une capture ALARMA! - TRANSPARENCE, ZONE DE NOTIFICATION par killerkurgan
Source avec Zip Source avec une capture L'HEURE DE PLUSIEUR PAYS - HORLOGE MONDIALE par zulrigh
Source avec Zip Source avec une capture CALENDRIER VB6 ET HORLOGE ANALOGIQUE par enzo68290
Source avec Zip Source avec une capture CALCULE HEURES DE NUIT 2 par ocejade
Source avec Zip K8063 AFFICHAGE DE L'HEURE DES DIGITS JUMBO POUR APPRENTISSA... par nono7380

Commentaires et avis

Aucun commentaire pour le moment.

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

Procédure conditionnelle [ par LAM ] Bonjour chers amis...Depuis pratiquement un mois je travaille sur une base de donnée avec MS ACCESS dans le but de faire la gestion d'une école: emplo afficher l'heure [ par FDA ] Le but est de mesurer le temps d'utilisation d'un logiciel.Dans visual basic (vers 5) il est possible de stocker l'heure de départ, avant utilisation cycles processeurs [ par whrein ] Mon problême est de savoir si mon programme prend le maximum decycle process qu'il peut ou si il laisse la main pour la reprendre lorsd'un evenement Tache de fond [ par whrein ] Mon problême est de savoir si mon programme laisse la main pourla reprendre lors d'un evenement type " changement de l'heure " ( seconde suivante) Le dao, mdi et isdate [ par Altic ] Salut,_ y a t'il un moyen pour qu'une image se mette à la taille d'une feuille mdi mère_ sous access pour changer le format d'une date, soit on utilis Heure ? [ par M$Trou ] &lt;%=TIME%&gt; heure et texte [ par haroun ] bonjour j'aimerai savoir comment inscrire une heure dans un textBox merci d'avance calcule d'heure [ par x20ab ] comment faire pour calcul 2 heures difpar exp: 1) 12:15:002) 12:45:00-------------- 00:30:00voila je suis claire.j'ai essay avec l'exp mais ca march Recuperer le jour et l'heure systeme [ par tom ] Comment puis je récuperer le jour et l'heure du systeme d'exploitation pour ensuite l'afficher dans un labelMerci d'avanceTom


Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), 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

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,905 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales