VB: Помощ за един проект

[ArminVanBuuren]

Да се създаде проект с една форма, в която да с егенерира прозивеолно число от 1 до 100.Потребителят да се опита да познае това число и го въвежда.Ако не е познал в msgbox да му поакзва дали числото е по-голямо, или по-малко.Ако го е познал в msgbox да му показва, че е познал.

=======================

Искам помощ относно кода, който трябва да напиша в command box!

Благодаря!

[crio]

Предполагам, че търсиш нещо подобно:

Private Sub Form_Load()
Dim ch As Integer, ui As Integer
Randomize
ch = Rnd() * 100
Do
ui = InputBox("Int:")
If ui > ch Then
MsgBox "choose smaller"
ElseIf ui < ch Then
MsgBox "choose larger"
End If
Loop Until ui = ch
MsgBox "correct"
End Sub

 

Offtopic:

Ехх най-накрая малко VB

[ArminVanBuuren]

Да си жив и здрав!Нямаш си на идея, колко много ми помогна!

Хиляди благодарности! 10X 10X 10X