Published using Google Docs
Случайные числа в VB.docx
Updated automatically every 5 minutes

Случайные числа в VB

Для того, чтобы в Visual Basic сгенерировать случайное число необходимо использовать функцию Rnd. Эта функция возвращает случайное значение в пределах от 0 до 1

Примеры:

Процедура

Результат

Private Sub Command1_Click()

Cls

 Font.Size = 16

For i = 1 To 10

    Form1.Print Rnd

   

Next

End Sub

Числа от 0 до 9

Private Sub Command2_Click()

Cls

 Font.Size = 16

For i = 1 To 10

    Form1.Print Rnd * 10

Next

End Sub

Целые числа от 0 до 9

Private Sub Command3_Click()

Cls

 Font.Size = 16

For i = 1 To 10

    Form1.Print Int(Rnd * 10)

Next

End Sub

Целые числа от -5 до 5

Private Sub Command4_Click()

Cls

 Font.Size = 16

For i = 1 To 10

    Form1.Print Int(Rnd * 11) - 5

Next

End Sub