[الوادي]

يا علي،

جرب أبسط طريقة ب For Next

PHP كود :

For i1 = Asc("a") To Asc("c")
    For i2 = Asc("a") To Asc("c")
        For i3 = Asc("a") To Asc("c")
            ListBox1.Items.Add(Chr(i1) & Chr(i2) & Chr(i3))
        Next
    Next
Next