如何在excel表格中制作抽签刮奖 小孩子玩抽签怎么写内容?

[更新]
·
·
分类:运动休闲
3373 阅读

如何在excel表格中制作抽签刮奖

小孩子玩抽签怎么写内容?

小孩子玩抽签怎么写内容?

小孩子玩抽签可以选择像东南西北游戏中那样,比如说我们先写一个标题,如果可以成为动画片中的人物,你希望成为哪一个?,然后把所有的人物都写在标签里面,比如说有李逍遥,赵灵儿或者汤姆猫,小杰瑞,希瑞公主阿凡达等等,这样小孩子如果抽中其中的一个签,发现自己会变成小杰瑞,于是很沮丧,如果抽到了李逍遥,他们就会很开心

接亲抽签游戏内容怎么写?

接亲抽签游戏内容可以这样写:把所有的人物都写在标签里面,比如说有李逍遥,赵灵儿或者汤姆猫,小杰瑞,希瑞公主阿凡达等等,这样小孩子如果抽中其中的一个签,发现自己会变成小杰瑞,于是很沮丧,如果抽到了李逍遥,他们就会很开心

wps2016如何做姓名随机抽取?

第一步,制作抽签界面。
打开WPS表格2009,新建一个空白文档。假设一个年级有20个班,在a1单元格中录入“班主任姓名”,在(a2:a21)单元格区域中录入班主任姓名在b1单元格中录入“抽中班级”,在(b2:b21)单元格区域中录入“未抽签”字样若用e3单元格显示抽签后抽到的班级,则将e3单元格设置合适的边框和字号接着执行“视图→工具→控件工具箱”,单击“命令按钮”,在e3单元格下方插入两个按钮,并在“属性”窗口中设置Caption选项分别为“抽签”和“停止”,名称选项为默认的CommandButton1和CommandButton2。
第二步,为按钮实现其功能。
双击“抽签”按钮,打开代码窗口,输入下列代码(该代码中包含“停止”按钮的代码):
Option Explicit
Dim flag As Boolean, i, j, m As Integer
Private Sub CommandButton1_Click()
flag True #39初始化中断变量 当中断变量为真时开始抽签
tiaozhuan1:
For i 1 To 20 #39假如有20个班
DoEvents #39释放程序控制权 允许执行其它事件
For j 2 To 21 #39第2行到21行
If Cells(j, 2) i Then GoTo tiaozhuan2
Next
Cells(3, 5) i #39即e3单元格显示循环变量的值
If flag False Then GoTo tiaozhuan3 #39如果按下了停止按钮则退出
tiaozhuan2:
Next
If flag True Then GoTo tiaozhuan1
#39如果一次循环结束还没按下停止按钮则进行下一次循环
tiaozhuan3:
For m 2 To 21
If Cells(m, 2) #34未抽签#34 Then
Cells(m, 2) Cells(3, 5)
Exit Sub
End If
Next
End Sub
Private Sub CommandButton2_Click()
flag False #39中断循环
End Sub
现在关闭代码窗口,退出设计模式,一个抽签程序就制作好了。当单击“抽签”按钮,在e3单元格中轮流显示没有被抽中的班级,单击“停止”按钮时e3单元格显示该班主任抽中的班级,并将抽中的班号自动填写到相应的单元格中,该班号不再参与下一轮抽签当下一位班主任单击“抽签”按钮时进行下一轮抽签