PERMUTATIONS DE CARACTÈRES

Commentaire de Adn56 le 05/06/2012 08:17:26

Salut, quelque remarque sur une sub :
Private Sub traite()
Dim Mot As String
TextBox2.Clear()
Mot = TextBox1.Text
If Mot = "" Then Exit Sub
GetPerms(Mot)
End Sub

pense à optimiser ;)

Private Sub traite()
if not TextBox1.Text = string.empty then GetPerms(TextBox1.Text)
TextBox2.Clear()
End Sub

Le end dans la sub form closing ne sert à rien, il est même dangereux je crois bien ;)

bonne prog. kenavo