 |
pkburr02 Level: Trainee
 Registered: 16-08-2006 Posts: 1
|
eVB on PPC 2003
Ok i'm not an expert, closer to a beginner really i guess. BUT I do know how to create a random number roller, and I've done so on my PDA it works fine EXCEPT i can't get it to generate a number without a decimal, i don't mean everyone once in a while i'll get one without a decimal i mean EVERY number it generates has one. I thought (from quickbasic days) there was a way to get it to keep this from happening in short this is what i'm using:
Option Explicit
Dim roll As Integer
Private Sub cmdTest_Click()
Randomize
roll = ((6 + 1) * Rnd)
lblRoll.Caption = roll
End Sub
What am I missing? Thanks in advance.
|
|
16-08-2006 at 07:45 PM |
|
|
|
|
 |
 |