Gerar Integer Aleatório

[slype 1]

Karaka.... o negócio pego pro meu lado aki...Galera preciso de uma instrução que gere um Numero Inteiro (Dim Valor as Integer) a cada hora que ocorrer o evento clique em um botão...preciso que seje um numero aleatório de 1 à 50. (inteiro)Alguem ae pode me da um HELP?

[Fillipe 0]

eh simples:

Dim valor As IntegerRandomize Timervalor = Int(Rnd * 50) + 1