ProblémeRésolu

Question

Bonjour tout le monde, je suis nouveau ici, et en fait, je voudrais
savoir s'il y a une mani&#233;re simple  de ne plus afficher une
fen&#234;tre juste en cochant une case.

Je m'explique, je veux cr&#233;er un programme en vb, avec une fen&#234;tre de
pr&#233;sentation, et je voudrait sur cette fen&#234;tre rajouter une case a
cocher qui perm&#233;tra de passer directement au form2 au prochaine
ouverture.. Bon j'ai d'autre question :p mais sa suffira :)



Merci beaucoup d'avance

badboy38 · Accepted Answer

Sur la form de présentation, tu rajoutes une "checkbox" avec un texte "ne plus afficher cette page" (par ex...)

Dans le même dossier que ton .exe, rajoute un fichier .txt, par exemple "test.txt" avec un 0 sur la 1ère ligne

Dans le code du bouton d'affichage de la page suivante, tu mets:

'Début de ton code Dim DirNom As String DirNom = App.Path 'copie le chemin d'accès au dossier de l'exe If Check1.Value = 1 Then 'checkbox cochée Open DirNom + " est.txt" For Output As #1 'pour écrire dans le fichier Print #1, "1" Close #1 End If Form2.Visible = True Unload Me 'décharge la page d'accueil 'Fin de ton code

Dans le code de la form de présentation:

Dim DirNom As String Dim a As String DirNom = App.Path Open DirNom + " est.txt" For Input As #2 'pour la lecture dans le fichier Line Input #2, a If a <> 0 Then Form2.Visible = True Unload Me End If Close #2 'Suite de ton code de chargement Normalement ca marche... C'est peut être un peu compliqué (niveau longueur du code!!) mais je débute aussi en VB. Bon courage!! BadBoy38

cboulas · Answer

Salut, il te suffit de sauvegarder la valeur de ta case coch&#233; sur le disque ou la base de registre, ensuite &#224; la r&#233;ouverture, ton soft teste cette valeur et d&#233;termine si la case &#233;tait coch&#233; ou non, si elle n'&#233;tait pas coch&#233; ta valeur sera 0 et donc tu passe &#224; la form2 sinon tu va afficher ta form1


Chris...
Web : Firstruner - eMail : [mailto:support@firstruner.com Support]&nbs

cs_Fayo · Answer

Euh.. tu aurait la gentillesse de m'&#233;crire le code stp

cboulas · Answer

tu est en VB6 ou VB.Net ?


Chris...
Web : Firstruner - eMail : [mailto:support@firstruner.com Support]&nbs

cs_Fayo · Answer

En vb6. Bon je commence a l'utiliser.

Et je pense que d'apr&#233;s se que tu a dit je devrait utiliser
if/then/else... mais bon.. si tu pouvait me faire le code entier pour
un bouton (tu le nome comme tu veux) sa serait trop trop sympa..

cs_Fayo · Answer

Sa marche, merci