Gerando números aleatórios VB.net

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim numero As Integer

Dim GeradorDeNumerosAleatorios As Random = New Random()

If txtinf.Text = 0 Or txtinf.Text = "" Or txtinf.Text = " " Then

     numero = GeradorDeNumerosAleatorios.Next(txtsup.Text)

Else

    numero = GeradorDeNumerosAleatorios.Next(txtinf.Text, txtsup.Text)

End If

txtnumero.Text = numero

End Sub

Como funciona ?
Primeiro eu instanciei um objeto da Classe Random – GeradorDeNumerosAleatorios
A seguir usei o método Next  que retorna um número aleatório

A sintaxe usada pode ser:

1 – GeradorDeNumerosAleatorios.Next(valor) – gera um número aleatório entre 0 e  valor + 1

2-  GeradorDeNumerosAleatorios.Next(valor1 , valor2 ) – gera um número aleatório entre valor1 e valor2+1

Anúncios

Deixe um comentário

Preencha os seus dados abaixo ou clique em um ícone para log in:

Logotipo do WordPress.com

Você está comentando utilizando sua conta WordPress.com. Sair / Alterar )

Imagem do Twitter

Você está comentando utilizando sua conta Twitter. Sair / Alterar )

Foto do Facebook

Você está comentando utilizando sua conta Facebook. Sair / Alterar )

Foto do Google+

Você está comentando utilizando sua conta Google+. Sair / Alterar )

Conectando a %s