Les "Checkbox" liés au registre

Question

Bonjour

Je suis en train de faire un programme qui fonctionne avec des cases &#224; cocher (Checkbox).
Ces cases doivennt &#234;tre en rapport avec des valeurs du registre.

Par exemple :
-Au d&#233;marrage du programme, elles doivent &#234;tres coch&#233;es (ou non) si une valeur du registre et &#233;gal &#224; "1" ou "0", par exemple.
-Si on coche (ou d&#233;coche) la case, la valeur du registre doit changer, par exemple "0" ou "1".

Je pense que le code doit &#234;tre a peu pr&#232;s :

Set wshshell = CreateObject("Wscript.Shell")
wshshell.RegWrite "ma_cl&#233;_demand&#233;e", 0, "REG_DWORD"
If CheckBox1.Value = Checked Then
wshshell.RegWrite "ma_cl&#233;_demand&#233;", 1, "REG_DWORD"
End If


If CheckBox1.Value = 0 Then
WSHShell.RegWrite "ma_cl&#233;_demand&#233;", "0", "REG_DWORD"
End If
If CheckBox1.Value = 1 Then
WSHShell.RegWrite "ma_cl&#233;_demand&#233;", "1", "REG_DWORD"
End If


tempI = WSHShell.RegRead("ma_cl&#233;_demand&#233;")
If tempI = 1 Then
CheckBox1.Value = 1
Else
CheckBox1.Value = 0
End If

Pouvez vous me dire pr&#233;cisement quel est le code.

merci

valtrase · Answer

Salut,
VB contient une instruction pour cela
CheckBox1.Value = GetSetting(App.EXEName, "Options", "CheckBoxValue", "Valeur d&#233;faut")

De m&#234;me SetSetting ecrit dans la base
Sinon tu trouveras de bonnes sources sur le forum

Cordialement, Jean-Paul  
______________________________________________________________________

Le Savoir n'a de valeur que s'il est partag&#233;

cs_et1 · Answer

Merci pour le code.

Les "Checkbox" liés au registre

2 réponses

Discussions similaires