文件名称:VB6.0 七星彩摇奖机源代码.rar
文件大小:294KB
文件格式:RAR
更新时间:2022-07-30 13:11:23
VB源码-多媒体技术
VB6.0制作的界面挺花哨的七星彩摇奖机,类似于电视节目中的摇奖画面,开始摇奖后,一串数字开始转动,变化很快,停止来的一串数字就是中奖号码了,可用于举办活动时的抽奖程序,关于程序的实现,可参考以下核心部分的代码: Dim i As Integer Randomize '初始化随机数产生器 For i = 0 To Lbl_LuckyNum.UBound Lbl_LuckyNum(i).Caption = Int(Rnd * 10 0) ' Lbl_LuckyNum(i)中显示产生的一个0-10的随机数 Next i 完整代码请下载本源码哦。
【文件预览】:
codesc.net
----七星彩摇奖机()
--------image()
--------Form1.frm(8KB)
--------工程1.vbp(667B)
--------Form1.frx(295KB)
--------MSSCCPRJ.SCC(190B)
--------工程1.vbw(49B)