Help computer lottery applet. I am a teacher, so some people can answer questions in class. thank you

Private subcommand 1_Click ()

Define an array to store names.

Dim RStr(0 to 9) as a string.

Dim i，j，k

Assign a value to the number to scroll.

The actual usage should be RStr(0)= 1