Un label oriente verticalement

Soyez le premier à donner votre avis sur cette source.

Vue 2 185 fois - Téléchargée 347 fois

Description

Comment ecrire un texte verticalement dans un label ?

Source / Exemple :


Dim a As String
Dim b As String
Dim s As String

a= "Coucou"

For i = 1 to len(a)
     b = mid$(a,i,1) & Vbcrlf 
     s = s & b
Next

label1 = s

' N.B : VbCrLf = retour à la ligne ( chr$(13) & chr$(10) )

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Messages postés
1106
Date d'inscription
samedi 8 novembre 2003
Statut
Membre
Dernière intervention
3 septembre 2006
21
Pour ce genre de trucs, autant faire une boucle désincrémentale:
1) Soit une boucle inverse standard
2) Soit une boucle directe avec soustraction: Length - IndexBoucle pour simuler une évolution décroissante.

Ca évite des lignes de code inutile et on a alors à chaque étape:
coucou
couco#u
couc#o#u
cou#c#o#u
co#u#c#o#u
c#o#u#c#o#u

... avec le dièse correspondant bien sûr au retour chariot ;)
Messages postés
73
Date d'inscription
dimanche 29 décembre 2002
Statut
Membre
Dernière intervention
14 décembre 2010

pitètre avec un picturebox ou ce genrela non ? ^^
Messages postés
32
Date d'inscription
mercredi 17 mars 2004
Statut
Membre
Dernière intervention
24 novembre 2004

Ah mince c'est pas trop ca que je cherche,
je cherche comment faire pour faire pivoter les écritures de 90° ou 180° par exemple !

Et c'est pas si facile que ca !
Messages postés
340
Date d'inscription
jeudi 25 juillet 2002
Statut
Membre
Dernière intervention
25 août 2007

looooool
testréssé ?
mais non c'est pas grave ca arrive a tout le monde ...
Messages postés
2671
Date d'inscription
vendredi 25 janvier 2002
Statut
Membre
Dernière intervention
6 février 2013
2
testicule [;)] .....
Parfois on s'ennuie a rien faire alors on dis des conneries
Afficher les 6 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.