- 29 Agosto 2008
- 121
- 0
- Miglior risposta
- 0
ecco il mio piccolo programmino : password generator v1
download :
virus total :
commentatelo !!! ^^
source ^^ :
Private Sub Command1_Click()
Text1.Text = Mid$("bcdfghjklmnpqrstvwxz", Int(Rnd * 12) + 8, 10)
End Sub
Private Sub Command2_Click()
Text1 = ""
End Sub
Private Sub Command3_Click()
Clipboard.Clear
Clipboard.SetText (Text1)
End Sub
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
MsgBox "messaggio che vuoi te" ' inserisci messaggio che vuoi te
End Sub
download :
Perfavore,
Entra
oppure
Registrati
per vedere i Link!
virus total :
Perfavore,
Entra
oppure
Registrati
per vedere i Link!
commentatelo !!! ^^
source ^^ :
Private Sub Command1_Click()
Text1.Text = Mid$("bcdfghjklmnpqrstvwxz", Int(Rnd * 12) + 8, 10)
End Sub
Private Sub Command2_Click()
Text1 = ""
End Sub
Private Sub Command3_Click()
Clipboard.Clear
Clipboard.SetText (Text1)
End Sub
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
MsgBox "messaggio che vuoi te" ' inserisci messaggio che vuoi te
End Sub
Ultima modifica: