lunes, 12 de abril de 2010

Crear un número aleatorio

Crear un número aleatorio en Visual basic.net mediante la clase Random

Código fuente en un windows form

Texto planoCopiar código fuenteImprimir
Option Explicit On
Option Strict On

Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles MyBase.Load

'Inicializar la clase Random
Dim Random As New Random()

' generar un random entre 1 y 100
Dim numero As Integer = Random.Next(1, 100)

MsgBox(numero)

' generar un random entre 5 y 15
numero = Random.Next(5, 15)

MsgBox(numero)

' entre -50 y 1
numero = Random.Next(-50, 1)

MsgBox(numero)

End Sub
End Class

No hay comentarios:

Publicar un comentario