textbox

Question

salut je voudrai savoir si il i a quelqu'un qui c comment mettre 
Private Sub Command1_Click()
MkDir "C:\f"

Open "c:\f\f.txt" For Output As 1
Print #1, Text1.Text
Close 1

End Sub
sa dans un teste pour que quand le dossier existe deja il me mette pas derreur 
je que si il exsiste il louvre si il existe pas il le cree 
merci d'avence

crenaud76 · Answer

If Dir("C:\f",vbDirectory)="" Then MkDir("C:\f")


Christophe R.

drpsico · Answer

salut ton code je narive pas a le faire marcher 
jarrive a cree le dossier il mes f.txt dedan
mes si f il exsiste il ne fais rien

Private Sub Command1_Click()
If Dir("C:\f", vbDirectory) = "" Then
MkDir ("C:\f")
Open "c:\f\f.txt" For Output As 1
Print #1, Text1.Text
Close 1
End If
End Sub

$moi g mi sa petetre que g mal interpreter ton code
merci

drpsico · Answer

merci c moi qui a fai une merde ton code marche 
mes je voudrai savoir si je pe ecrire a la suis ds le f.txt
merci et encore une foi escuse moi

crenaud76 · Answer

Mets "For Append" au lieu de "For Output" et cela ecrira à la suite du fichier

Christophe R.

drpsico · Answer

merci sa marche c de la bombe
et une derniere de question
si g une form1 une form 2
que ds la form1 il i et polein de truc des label tousa
je voudrai que ds la form2 je mette une sorte de pallette et quand on clique sur une couleur ben sa chenge la couleur mes sur la form1
je c pas si c possible de chenger les propriete de la form1 a partir de la form2
merci d'avance

crenaud76 · Answer

Oui ! Il suffit de qualifier le nom du controle de Form1 totalement dans le code de Form2. Exemple :
Dans le code de Form2 :

Form1.Label1.BackColor = ....


Christophe R.

drpsico · Answer

merci

drpsico · Answer

mes quand je chnge la couleur d'une feuillke par exemple esque je pourai jeneraliser sa
par exemple je mes ma feuille bleu ben je ve que toute les feuille soit bleu
et esque c possible aussi d'enregistrer les chengemen
merci

Textbox

8 réponses

Discussions similaires