[VB6] Saisie automatique d'une date

Recherche :

Dernière réponse
Sujet : [VB6] Saisie automatique d'une date
Bendes	En fait, dans un de tes sous-menus de VB, tu as "Références...". Tu ouvres ce sous-menus et dans la liste,tu cherches un composant qui porte le nom de "maskEdit" (je connais plus la dénomination exacte). Ce composant te permet d'avoir une TextBox avec un format de saisie... Si tu ne le trouves pas dans ta liste, c'est que le composant OCX n'est pas installé sur ta machine. Voici un site où tu pourras le télécharger: http://www.mauro.sistel.it/ocx/activex.htm

Dernière réponse

Sujet : [VB6] Saisie automatique d'une date

Bendes

En fait, dans un de tes sous-menus de VB, tu as "Références...". Tu ouvres ce sous-menus et dans la liste,tu cherches un composant qui porte le nom de "maskEdit" (je connais plus la dénomination exacte).

Ce composant te permet d'avoir une TextBox avec un format de saisie...

Si tu ne le trouves pas dans ta liste, c'est que le composant OCX n'est pas installé sur ta machine. Voici un site où tu pourras le télécharger: http://www.mauro.sistel.it/ocx/activex.htm

Votre réponse

Nom d'utilisateur

Pour poster, vous devez être inscrit sur ce forum .... si ce n'est pas le cas, cliquez ici !

Le ton de votre message

Votre réponse

Smilies

Liste des smilies perso
Wiki smilies
Chercher un smiley

Options

Activer votre signature
Désactiver les smilies
Activer la notification par email du sujet

Aperçu

Vous avez perdu votre mot de passe ?

Vue Rapide de la discussion

Bendes

macray

bref...tu traduit ta chaine numérique en chaine de caractére
puis avec la fonction "instr" tu découpera ta chaine en faisany en sorte de récuper d'abord 02 puis 24 et enfin 2002..

A chaque récup tu mets la valeur recus dans une variable et tu ajoute "/" et ainsi de suite pour la seconde récup que tu feras. il n'y aura qu'a la dernière ou de n'aura pas a remettre le "/"

dim a,d,e,f,g

num1 = 02242002
texte1 = val(num1) // texte1= "02242002"(commentaire)

c = instr(... <---- A toi de mettre les instructions car je ne me souviens plus, sa récupére seulement un morceau de la chaine de caractère..)

a = c & "/"

d = inst(...
e = a + d & "/"

f = instr(...
g = f + e

msgbox("la chaine converti est :" & g)

c'est une méthode assez barbare mais qui marche ! :D
autremen tu as www.vbfrance.com, tu as pas mal de chose pour t'amuser ! :D

[jfdsdjhfuetppo]--Message édité par macray--[/jfdsdjhfuetppo]

camarchepoa

heu ... desole mais g pas trouve ...

tu pourrait etre un peu plus precis STP ??

merci :jap:

Bendes

Il existe un composant "MaskEdit" qui fait ça très bien

camarchepoa

ben oui mais g pas trouve le myen de savoir ou je me trouve dans la saisie, un genre de compteur de caractere dans le TextBox ...

parceque pour faire ca il faut faire :

si on est au troisieme ou au sixieme caractere : ajouter un / et incrementer le compteur

mais pour faire le compteur :(

prettysmile

et version bourrin : tu recupere la chaine tu ajoute les / et tu rnvoie le tout?

camarchepoa

bonjour !! :hello:

je cherche a faire une sorte de saisie automatique en VB, cad que l'utilisateur tappe "200202" et ca affiche "20/02/2002"

g essayer avec format(text, "/" ) mais ca a pas l'air de marcher : il mets juste un / a la fin du texte ...

si qq avait une idee ... il est le bienvenue :) :jap: