Sub Shuffle ( )
Randomly shuffle the array using the Fisher–Yates algorithm.
Dim A As String[] = ["G", "A", "M", "B", "A", "S"] A.Shuffle() Print A.Join()
B,A,G,A,M,S