vb猜数字游戏代码随机产生四个数然后随便用加减乘除得出结果为24

VERSION 5.00
Begin VB.Form frmMain
BorderStyle = 1 'Fixed Single
Caption = " 24点"
ClientHeight = 4020
ClientLeft = 45
ClientTop = 330
ClientWidth = 5325
Icon = "Form1.frx":0000
LinkTopic = "Form1"
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 4020
ScaleWidth = 5325
StartUpPosition = 3 '窗口缺省
Begin VB.Timer t
Interval = 20000
Left = 4440
Top = 2310
End
Begin VB.CommandButton cmdExit
Caption = "退出"
Height = 525
Left = 3330
TabIndex = 6
Top = 3030
Width = 975
End
Begin VB.C