Discussion :

[sunwind]

Bonjour, j ai un formualire avec plusieurs bouton rectangulaire classique horizontal.
En fait j aimerai en mettre quelques uns de manière verticale et ajuster le texte de haut en bas.
J espere m etre fais comprendre.

[Invité]

Bonjour

Il n'y a pas d'instruction pour le faire, l'astuce est de faire des retours chariots.

Cela devrait être de ce style :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Me.Commande4.Caption = "l" & vbCrLf & "e" & vbCrLf & "b" & vbCrLf

et ainsi de suite.

Starec

[sunwind]

Merci ca devrait marcher
Comme je bosse sur des bouton et zones de textes, savez vous comment je peux faire clignoter en fonction d une condition la couleur de fond d une zone de texte et non pas faire clignoter tout le controle comme j ai vu dans la FAQ.
Voici ma condition dans le code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
 
If Abs(Me!Texte14.Value) > 1.5 Then
    Me!Texte14.BackColor = lngRed
    Else
    Me!Texte14.BackColor = lngWhite
    End if

Je sais pas trop placé la notion de minuterie pour avoir une alternace rouge/blanc quand Abs(Me!Texte14.Value) > 1.5 et non pas un fond de couleur rouge en permanence.
Merci pour vos conseils

[Gabout]

Bonjour,

Tu peux gérer le clignotement par les propriétés Sur minuterie et Timer d'un formulaire.

A+

[sunwind]

J ai déjà essayé mais dans ce ca j intervient sur la propriete du controle c est à dire que le controle disparait et ré-apparait au rythme du timer.
Moi je voudrais juste faire clignoter le fond de couleur.

[Renardo]

Essai comme cela

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Private Sub Form_Timer()
If Me.Texte13.BackColor = 65535 Then
Me.Texte13.BackColor = 16777215
Else
Me.Texte13.BackColor = 65535
End If
End Sub

Interval minuterie 1000