This is some code that will produce a random number between 0 and 100.
debug.Log((Int((100 - 1) * Rnd()) + 1))
You could also use RandomPassword
Dim i For i = 1 to 100 debug.Log(RandomPassword(,1,2)) Next
Or if you want to use letters then
Dim i For i = 1 to 10 debug.Log(RandomPassword("ABC",1,2)) Next