Ir para conteúdo
Fórum Script Brasil
  • 0

Função Rnd (ramdonmize)


brunohjoia

Pergunta

Aew galera!

To querendo fazer uma rotina onde, quando eu clicar num comandbutton, na label apareça um valor aleatório, mas que esse valor seja 1, 2 ou 3 apenas! Sei q existe uma função rnd q faz isso, mas não sei como utilizá-la... Alguém aí poderia me dar uma dica de como fazer o q estou tentando? Se houver alguma outra função também serve!

Vlw Galera!

Bruno

Link para o comentário
Compartilhar em outros sites

4 respostass a esta questão

Posts Recomendados

  • 0

Eu testei e esse código funcionou(mude para o q você precisar):

    Dim a As Integer
    a = Round(3 * Rnd(1), 0)
    While a = 0
        a = Round(3 * Rnd(1), 0)
    Wend
    MsgBox a

É só colocar isso no seu commandButton e ele vai exibir uma mensagem com o número aleatório(nesse caso só 1,2 e 3)

É isso?

Igor

Link para o comentário
Compartilhar em outros sites

  • 0
Guest Gardenni

Olá Igor, vi o seu código abaixo e estou precisando algo parecido. Só que no meu caso preciso que a rotina gere um numero randomico de 7 dígitos, você poderia me ajudar?

Eu testei e esse código funcionou(mude para o q você precisar):

   Dim a As Integer
    a = Round(3 * Rnd(1), 0)
    While a = 0
        a = Round(3 * Rnd(1), 0)
    Wend
    MsgBox a

É só colocar isso no seu commandButton e ele vai exibir uma mensagem com o número aleatório(nesse caso só 1,2 e 3)

É isso?

Igor

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152k
    • Posts
      651,7k
×
×
  • Criar Novo...