Понедельник, 03 Августа 2020, 12:15

Приветствую Вас Гость

[ Новые сообщения · Игроделы · Правила · Поиск ]
  • Страница 1 из 1
  • 1
Форум игроделов » Программирование » Basic » Rnd в VBnet
Rnd в VBnet
LevriteДата: Пятница, 14 Сентября 2012, 19:17 | Сообщение # 1
участник
Сейчас нет на сайте
Люди знающие помогите пожалуйста, в чём проблема может быть Программа при нажатии на кнопку должна генерировать число, но в итоге она ничего не генерирует, вот кусочек кода:

Public Class Form1
Dim chislo As Integer

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

Randomize()
chislo = Fix(Rnd() * 100)
End Sub

А на деле у меня ничего не происходит, если написать н-р так:

chislo = 15

То всё работает. В чём трабл?


FirstДата: Пятница, 14 Сентября 2012, 21:02 | Сообщение # 2
Уолтер Брайт
Сейчас нет на сайте
Quote (Levrite)
Randomize()
chislo = Fix(Rnd() * 100)
End Sub


Не учил VB.nеt, но знаю VB и код будет таков:

Private sub Command1_click()
Chislo = int(rnd()*100)
end sub

Попробуй поставить вместо Fix - Int

Помог, чем смог biggrin
Форум игроделов » Программирование » Basic » Rnd в VBnet
  • Страница 1 из 1
  • 1
Поиск:

Все права сохранены. GcUp.ru © 2008-2020
free games download
Рейтинг