抽签号码软件,抽签表怎么做

手指按在手机上来抽签的软件是什么?

你说这款中华抽签软件的话，我在拼多多里面也看到过这个软件，就是抽签看的车的什么运气之类的。

求一个随机抽签不重复软件或.exe程序,1-36之间不重复。

vb源码：

Dim num(1 To 36) As Integer

Dim a As Integer

Private Sub Command1_Click()

Dim temp As Integer

For k = 1 To 36

num(k) = 0

Next k

For i = 1 To 36

temp = CInt(Rnd() * 35) + 1

a1:

If num(temp) = 0 And temp <> 0 Then

num(temp) = i

Else

temp = CInt(Rnd() * 36)

DoEvents

GoTo a1

End If

Next i

MsgBox "抽签完成", vbInformation, "提示"

End Sub

Private Sub Command2_Click()

If num(1) = 0 Then

MsgBox "还没有抽签那", vbInformation, "提示"

GoTo a2

End If

If a = 0 Then

a = 1

ElseIf a = 36 Then

MsgBox "到底了", vbInformation, "提示"

a = 1

End If

Text1.Text = "第" & a & "号抽签结果是：" & num(a)

a = a + 1

a2:

End Sub

Private Sub Command3_Click()

End

End Sub

Private Sub Form_Load()

For k = 1 To 36

num(k) = 0

Next k

End Sub

下面附上运行效果图：

如果没有vb6的话给我邮件地址帮你发啦

有没有这样的抽签(选择)软件?

这不就是福利票的选号一样嘛
只是加了个数字过滤
去3D乐园下 里面把软件下下来 把该过滤的
和只能用的号码或数字 抽签就可以了

求一款数字抽签软件(excel做的也行)!!!

excel公式：=RANDBETWEEN(300,800)/100

如何用excel做一个抽签实验?

您好，方法
1、首先打开Excel，新建一个表格，选中一个区域，作为号码生成区，
2、然后我们在功能区点击“合并居中”，
3、然后输入函数：=INT(RAND()*(100-1+1))+1，
4、如果只想做50人之内的号码抽签，就把100改为50，此时函数为：=INT(RAND()*(50-1+1))+1，
5、点击回车键，函数会自动生成一个50之内的数字，
6、最后按键盘F9键进行刷新，即每按一次F9将出现新数字。

如何用word制作简易抽签号码

用EXCEL吧，输入1到2个序号，然后鼠标慢移动到单元格右下侧的小点处，待形状变为实心十字时是向下拖，想要多少拖多少，什么一百个、一千个，到万都可以的!