06/11/09 19:39
LittleHacker
Postato originariamente da Mikiwi93:
Ho provato a far così:
Ma il label 5 non mostra nessun numero.
Ho provato a far così:
If Dir("C:/nomefile.txt") = "" Then Randomize e = 789 'Assegnazione valore alla variabile f = 34 'Assegnazione valore alla variabile g = Int((f * 3 + 4 - 6 + e * 1) * Rnd) + e Label5.Caption = g Open "c:/nomefile.txt" For Output As #1 Print #1, Label5.Caption Close #1 Else Open "C:/nomefile.txt" For Output As #1 Print #1, Label5.Caption Close #1 End If
Ma il label 5 non mostra nessun numero.
Hai provato a controllare se nel file creato c'è scritto qualcosa?
aaa