Textbox evolution

Soyez le premier à donner votre avis sur cette source.

Vue 11 890 fois - Téléchargée 1 770 fois


Description

Voici une TextBox un peu plus évoluée que celle de VB

Possibilité de définir les caractères autorisés
Possibilité de définir un formatage de la textbox
- Ce formatage s'applique lorsque l'on quitte la textbox puis disparait quand on y revient
- Possibilité d'afficher ce formatage avec ENTER. Appuyer sur ECHAP pour revenir en affichage normal
- Exemple = "mm/dd/yyyy" pour une date à l'anglaise

Pour les nombres :
Possibilité de définir le séparateur décimal de son choix (il ne pourra donc être saisi qu'une seule fois)
Possibilité de définir le nombre max de décimales
Possibilité de définir un symbole decimal (ex : ?) qui ne s'affiche qu'une fois le champs formaté
Possibilité de saisir un raccourci pour les milliers (ex : saisir 12K on obtient 12000)

Le problème dans ce genre de code c'est que l'on bloque souvent la saisie mais que l'on oublie que l'utilisateur peut contourner le problème avec un simple copier/coller. Et là .... la seule solution : le Sous-Classement pour repérer le COLLER avant qu'il ne se produise.
Et quand on fait du Sous-Classement en VB, rien de mieux que la DLL de Renfield. Elle est jointe au zip ;-)
Pensez donc pour ceux qui ne l'ont pas déjà (il y en a ??) à la placer dans le dossier system puis enregistrez la avec Regsvr32

Source / Exemple :


If YouWant Then
   DownloadZip.Click
End if

Call HaveFun

Conclusion :


J'ai posté cela suite à une demande du forum. Même si cela va beaucoup plus loin que la question posée.
http://www.vbfrance.com/forum.v2.aspx?ID=637794

Le code a été pas mal optimisé avec l'aide de Renfield (merci encore !).
N'hésitez pas à me faire part de vos observations.

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Messages postés
1411
Date d'inscription
mercredi 6 août 2003
Statut
Membre
Dernière intervention
3 mars 2019
1
Oui effectiveemnt je voulais parler du MaskedTextBox. Pour obtenir plus de renseignements sur son utilisation, tu peux te rendre à cette adresse (bas de page) :
http://plasserre.developpez.com/v3-4.htm

Et plus généralement pour toutes autres questions sur l'utilisation de VB.Net :
http://plasserre.developpez.com/vsommair.htm

Bonne prog
++
Messages postés
8
Date d'inscription
lundi 5 décembre 2005
Statut
Membre
Dernière intervention
18 novembre 2008

Bouv, je suis en train de tester "MS VB 2008 Express edition". Quand tu dis que la textbox de base peut-être configurée comme le premier modèle de ta textbox evolution, tu veux dire que les options sont accessibles dans les propriétés du control? Parce que je trouve rien qui y ressemble avec avec la textbox de base. Par contre le maskedtextbox est intéréssant mais je n'arrive pas non plus à obtenir le même comportement que dans la textbox evolution. Ou alors tu parlais de la fonction "isnumeric"?

Tu peux me dire comment tu fais pour obtenir le comportement du 1er modèle de la textbox evolution avec "MS Visual Basic 2008 Express edition"? Est-ce que Ctrl+C , Ctrl+V et Ctrl+X fonctionne dans ce cas de figure?

Merci
Messages postés
8
Date d'inscription
lundi 5 décembre 2005
Statut
Membre
Dernière intervention
18 novembre 2008

Merci pour ta réponse. Je crois que je vais donc passer à VB.NET. N'empêche que tu avais fait du sacré bon boulot en VB6 ;)
Messages postés
1411
Date d'inscription
mercredi 6 août 2003
Statut
Membre
Dernière intervention
3 mars 2019
1
Désolé mais je n'utilise plus cette source depuis longtemps. Je n'utilise d'ailleurs même plus VB6 (je suis passé en .NET).
Cela dit de mémoire :
- Copier, Couper et Coller sont interdit volontairement afn d'éviter que des caractères interdits ne soit insérés dans le TextBox (exemple : insérer des lettres dans un TexBox numérique.
- Pas d'apparence 3D volontairement aussi pour la ressemblance XP
- Il existe une propriété pour modifier le symbole monétaire. Un vide ou un espace doivent donc le supprimer
- Pour te passer de la DLL tu peux regarder dans les sources de Renfield il a publier un module qui rend les mêmes services et que tu pourra intégrer à ce projet. Les adaptation necessaires seront mineures.

Pour info en VB.NET, la TextBox de base rempli déjà toutes ces fonctions. Que du bonheur !

Bonne prog
++
Messages postés
8
Date d'inscription
lundi 5 décembre 2005
Statut
Membre
Dernière intervention
18 novembre 2008

Ah oui, étant donné qu'il faut placer dans le système et inscrire Rey_SubClasser.dll au registre, je suppose qu'un .exe qui fait ça à son exécution ne pourra pas fonctionner dans un environnement protégé (entreprise), s'il est lancé par l'employé lambda ne disposant pas des droits nécéssaires.

Si c'est le cas, y aurait-il une solution pour que le programme fonctionne dans ces environnements?
Afficher les 10 commentaires

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.