主题：谁会帮我编一个彩票工具，（简单）
zhongjun01
[专家分：0] 发布于 2008-05-20 11:15:00
谁能帮我编一个彩票工具，数据转换工具
QQ：360458277
回复列表 （共3个回复）
沙发
Sun-Ny [专家分：20] 发布于 2008-05-20 11:57:00
只几个控件,一个随机函数就搞定.
板凳
guoyong_cy [专家分：3050] 发布于 2008-05-20 19:48:00
神人......
你怎么知道简单？
那说明你编过。
还找我们干什么......
3 楼
cxj98 [专家分：40] 发布于 2008-05-23 07:58:00
一个控件，一个按扭就搞定！
Option Explicit
Private Sub Command1_Click()
Label1.Caption = Int(Rnd * 10) & " " & Int(Rnd * 10) & " " & Int(Rnd * 10) & " " & Int(Rnd * 10) & " " & Int(Rnd * 10) & " " & Int(Rnd * 10) & " 幸运号：" & Int(Rnd * 10)
End Sub
Private Sub Form_Load()
Randomize
End Sub
[url=http://www.vb01.net]到这个网站看看[/url]，也许你会受益不浅！
我来回复
您所在位置：社区首页 — Visual Basic讨论区 — 谁会帮我编一个彩票工具，（简单）