Dim Letters(99) as String
Dim RandomClass as new Random()
Dim RandomNumber as integer
Console.writeline("Enter word to scramble(with 2 or more letters)")
MyString = Console.ReadLine()
Loop Until MyString.Length >= 2
for i = 0 to mystring.Length
letters(i+1) = MyString.Substring(i,1)
RandomNumber = Randomclass.next(1,Mystring.Length + 1)