Write a lottery program with VB
{1, interface design to create a standard EXE project. Place a timer (Timer1), two text boxes (Label1, Label2), two command buttons (Command1, Command2), and arrays containing 7 elements (Label3 (0) -Label3 (6) ). Second, the property sets all the elements in the Label3 control array all the same settings. Third, the implementation principle of code writing this program is: When the user clicks the "Start" button, open the timer, use the timer control to generate two random numbers SJ1, SJ2, SJ1 range from 1 to 32, SJ2 range It is 0 ~ 49. When SJ1 = 24 is compared with SJ2 with the previous winning number, if the previous winning number is the same, the process is exited; if the previous winning number is different, the random number is used as the winning number. When 7 winners are generated, the timer control is turned off to stop generating random numbers. Introduction to the function used in this program: (1) Randomize: The number of seeds that initialize the random number. (2) INT (): Returns an integer after a non-oily digital. (3) RND: Generates a random number between 0 to 1 (greater than or equal to 0, but less than 1). (4) qbcolor (): Returns the color of the parameter (0 ~ 15). (5) VAL: Transforms a character variable into a numeric variable. (6) Format: Format an expression.