Etiquette

Description

cette source permet de créer et d'utiliser les propriétés Alignment, AutoSize et WordWrap ( c juste quelque effet 'spéciaux' lol

Source / Exemple :


Option Explicit
 'gauche
Private Sub Command1_Click()
lblAffichage.Alignment = vbLeftJustify
End Sub
 'centrer
Private Sub Command2_Click()
lblAffichage.Alignment = vbCenter
End Sub
 'droite
Private Sub Command3_Click()
lblAffichage.Alignment = vbRightJustify
End Sub
 ' zone de texte
Private Sub Command4_Click()
lblAffichage.Caption = "Les propriétés Alignment, AutoSize et WordWrap :-)"
End Sub
 ' décharger le prog (fin)
Private Sub Command5_Click()
End
End Sub
  ' Autosize activé
 ' procédure rétablir qui rétabli le format du cadre
Private Sub Command6_Click()
Rétablir
lblAffichage.AutoSize = True
lblAffichage.WordWrap = False
End Sub
 'WordWrap activé
Private Sub Command7_Click()
Rétablir
lblAffichage.AutoSize = False
lblAffichage.WordWrap = True
End Sub
 'les deux activée
Private Sub Command8_Click()
Rétablir
lblAffichage.AutoSize = True
lblAffichage.WordWrap = True
End Sub
 ' aucun
Private Sub Command9_Click()
Rétablir
lblAffichage.AutoSize = False
lblAffichage.WordWrap = False
End Sub
'effacer, rétablir la position, taille, et valeurs initiales
Private Sub Rétablir()
 lblAffichage.Caption = " hi hi hi hi hi ...."
 lblAffichage.Left = 960
 lblAffichage.Height = 255
 lblAffichage.Width = 5900
End Sub

Conclusion :


http://www.steven007.fr.st

Codes Sources

A voir également

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.