• Home
 · 
• Math/Dates
 · 
• Three Letter Combinations

Three Letter Combinations

Three Letter Combinations

Rate Three Letter Combinations

• 1
• 2
• 3
• 4
• 5

(2(2 Vote))

For I = 97 To 122
    For J = 97 To 122
        For K = 97 To 122
            List1.AddItem Chr(I) & Chr(J) & Chr(K)
        Next
    Next
Next
MsgBox Str(List1.ListCount) & " combinations generated."
' returns 17576 combinations generated.
' aaa   shows up first
' aab   shows up second
' aac   shows up third, etc.
End Sub