Random number in text box

I need to push a button and have a random number from 1 to 6 appear in a text box. Is there an example program which contains this behavior? Or could some kind and knowledgeable soul show me how? Thanks.

Set your text box to Str$(Random(6)+1)

Random(6) returns 0 thru 5
So the plus +1 will give you 1 thru 6

Thanks, Jeff.