Gambas France BETA


Pas de compte ? Incription

ToggleButton

À propos de ce code

Démonstration de ToggleButton

Code source

1
2
3
4
5
6
7
8
9
10
11
12
13
' Gambas class file

PUBLIC SUB tgbOnOff_Click()

IF tgbOnOff.Value = TRUE THEN tgbOnOff.Text = ("Enclenché" ELSE tgbOnOff.Text = ("Éteint")

END

PUBLIC SUB tbQuitter_Click()

ME.Close()

END

Commentaires