VB6.0 七星彩摇奖机源代码.rar

VB6.0制作的界面挺花哨的七星彩摇奖机，类似于电视节目中的摇奖画面，开始摇奖后，一串数字开始转动，变化很快，停止来的一串数字就是中奖号码了，可用于举办活动时的抽奖程序，关于程序的实现，可参考以下核心部分的代码： 　　DimiAsInteger 　　Randomize'初始化随机数产生器 　　Fori=0ToLbl_LuckyNum.UBound 　　Lbl_LuckyNum(i).Caption=Int(Rnd*100)'Lbl_LuckyNum(i)中显示产生的一个0-10的随机数 　　Nexti 　　完整代码请下载本源码哦。