how can i make a random number not to always appear every time i open the program
my code always prints or present same number every time i open and terminate and open it again and again it always shows same number but if i click a button for random it does show random number
this code just my example:
note: this is just an example not my true code in my program...
Dim rndm As Integer Randomize rndm = Int(4 * Rnd()) Select Case rndm Case 1 list1.additem = 1 Case 2 list1.additem= 2 Case 3 list1.additem = 3 Case 4 list1.additem = 4 End Select