Convertisseur minuscules/majuscules

Soyez le premier à donner votre avis sur cette source.

Vue 4 147 fois - Téléchargée 302 fois

Description

Bonjour, je suis nouveau dans la programmation VB, alors j'ai decidez de pas commencer trop dur... Alors j'ai fait un convertisseur de majuscules => minuscules et vis-versa.

Source / Exemple :


Private Sub Command1_Click()
 'On declare la variable a
Dim a As String
 'La variable a prend la valeur du champ Text1 convertit en minuscule
a = LCase("" & Text1.Text)
 'On marque la phrase transformée en minuscule dans le champ Text1
Text1.Text = "" & a
 'On declare la variable b
Dim b As String
 'La variable b prend la valeur du nombre de caractères dans le champs Text1
b = Len("" & Text1.Text)
 'On marque le nombre de caractere que contient le champs Text1 dans le champs Text2 grace a la variable b
Text2.Text = "" & b
End Sub

Private Sub Command2_Click()
 'On declare la variable c
Dim c As String
 'La variable c prend la valeur du champ Text1 convertit en majuscule
c = UCase("" & Text1.Text)
 'On marque la phrase transformée en majuscule dans le champ Text1
Text1.Text = "" & c
 'On declare la variable d
Dim d As String
 'La variable d prend la valeur du nombre de caractères dans le champs Text1
d = Len("" & Text1.Text)
 'On marque le nombre de caractere que contient le champs Text1 dans le champs Text2 brace a la variable d
Text2.Text = "" & d
End Sub

Private Sub mnuabout_Click()
 'Quand on clique sur about, on affiche une MsgBox avec les infos dedans
about = MsgBox("Convertisseur v1 par Loïc", vb1, "Convertisseur")
End Sub

Private Sub mnufichierquitter_Click()
 'Quand on met Fichier => Quitter le programme s'arrete
Unload Me
End Sub

Conclusion :


C'est mon tout premier programme en VB, alors critiquer pas trop. ;-)

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Messages postés
1
Date d'inscription
lundi 21 avril 2003
Statut
Membre
Dernière intervention
9 août 2003

Hello je viens de rentrer de vacances...
1) Pour les "" G appris aujourd'hui qu'on étais pas obliger de les mettres...
2) C'est vrai que je sais pas encore faire grand chose... J'ai un peu compris l'utilisation de wiinsock...
3) N'oubliez pas que je suis un newbies ;-) et je suis encore jeune (13 ans).
4) Si qqun veut m'apprendre 2 - 3 truc: caramail: x.surveillant.x@caramail.com
msn: x.surveillant.x@caramail.com
Messages postés
721
Date d'inscription
dimanche 10 juin 2001
Statut
Membre
Dernière intervention
27 mars 2011
5
Mais c un long code par pas gd choz ... je sais bien kil y a des débutants, mais bon c pas des NEUNEU non plus
Messages postés
70
Date d'inscription
vendredi 22 février 2002
Statut
Membre
Dernière intervention
13 novembre 2003

en fait, pour l'histoire de unload, unload me exécute form_unload, et si aucun timer n'est activ" ( enabled=false ou interval=0) ansi qu'aucune autre form ouverte, cela termine le programme ( unload me = clic sur la croix de fermeture en haut à droite ou double clic sur l'icone system de la fenetre en haut à gauche, ou choix de Fermer dans le menu systeme ( aussi en haut à gauche)
Vala
Donc si on a l'intention d'éffectuer des changements par la suite dans le programme et qu'il serait possible de vouloir demander l'avis de l'utilisateur avant de quitter(oula, je me suis perdu dans ma phrase)
et ben c'est mieux d'utiliser unload me à chaque fois
Vala
et si on utilise de timers ou d'autres forms invisibles mais non déchargées par unload me, il faut mettre end dans unload me de la form principale
après cette explication nete et présise ément débousolante,
Bon codage!
Messages postés
438
Date d'inscription
vendredi 9 mai 2003
Statut
Membre
Dernière intervention
26 juillet 2007
3
ben en fait ta juste appris à utilise ucase et lcase...

pour certain trucs, ca peut etre bien d'avoir les deux, unload et end.... pq je crois ke end ne prens pas ce que tu met dans le form_unload... mais c clair kil faut de toute facon avoir un end à une place....
Messages postés
1247
Date d'inscription
mardi 7 mai 2002
Statut
Membre
Dernière intervention
18 février 2019
3
desolé etilegr , mais rené38 a raison. sinon le soft ne se ferme pas et il reste ouvert en tache de fond.
Fait ctrl+alt+supp tu verra qu'il sera tj prensent dans la liste des tache.
unload : decharge la form
end : quitte le soft et ferme toutes les forms!!
Afficher les 9 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.