打开Excel表格,首先我们输入一个函数:=INDEX()。
首先我们选中第1列的姓名,然后输入逗号,再输入函数,将公式补充完整为:=INDEX(A:A,RANDBETWEEN(4,15)
按下回车键之后,按住F9不松就可以开始随机抽奖,松开F9就可以得出抽奖结果.
假定开始按钮是 Command1,两个文本框分别是 Text1、Text2Private Sub Command1_Click()
Randomize
Text1.Text = Int(Rnd * 20) + 1
Text2.Text = Int(Rnd * 20) + 1
End Sub
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)