求一个随机抽取姓名的软件
...比如班里有50个人 想要弄个软件随机抽取姓名来回答问题 就像抽奖...
可以用抽奖软件——PLuckyDraw，从名单中随机抽取1-N个人，
可以利用office EXCEL来实现。在A列（A1、A2、A3等连续输入你要随机选取的名字）在B1单元格输入公式：INDEX(A1:A4,INT(RAND()*(4-1)+1),1)其中：A1:A4 是你在A列输入全部名字的范围，例如第一个填写名字的单元格是A1而最后一个名字的单元是A20，那么就是A1:A20。RAND()*(4-1)+1 的说完了。
可以用抽奖软件——PLuckyDraw，从名单中随机抽取1-N个人，
可以利用office EXCEL来实现。在A列（A1、A2、A3等连续输入你要随机选取的名字）在B1单元格输入公式：INDEX(A1:A4,INT(RAND()*(4-1)+1),1)其中：A1:A4 是你在A列输入全部名字的范围，例如第一个填写名字的单元格是A1而最后一个名字的单元是A20，那么就是A1:A20。RAND()*(4-1)+1 的说完了。
1、在授课界面上在授课界面上，点击随机抽取按钮。这个按钮通常在屏幕的上方或者下方，很容易找到。在弹出的随机抽取窗口中，可以选择按座位号抽取或者按名字拼音抽取。根据你的需求，选择合适的方式。2、如果选择按座位号抽取如果选择按座位号抽取，你需要输入学生的座位号。输入完成后，点击开始抽取按钮。
在win10上设置随机抽取人名和姓名，我们可以通过excel来设置，具体有以下步骤：1、我们可以打开excel点击界面最上方菜单栏中的“文件”功能，然后点击“打开”，找到我们可以进行抽取人员的名单文件，点击打开。2、打开该文件后，在空白位置建立姓名抽取单元格，在此单元格中输入公式：INDEX(A:A,RANDBETWEEN希望你能满意。
excel高手请进:100个姓名后面对应100个电话号码,在随机抽取20个...
2. 在辅助列中，我们可以使用Excel的“RAND()”函数来生成随机数。3. 对含有随机数的列进行排序，这样排序后的前20个记录就是我们要随机抽取的名字。4. 将这20个记录复制并粘贴到其他地方，以便进行后续操作。5. 最后，对原始数据中的“姓名”列进行排序，以恢复数据的原始顺序。6. 完成上述操作好了吧！
1、首先打开要进行随机抽查的人员表。2、然后打开插入函数对话框，类别中选择【全部】。3、然后找到【RANDBETWEEN】，点击。4、然后设置数字的最低值，还有最高值。5、接着在抽查人员框中输入【VLOOKUP(D2,A2:B11;2,FALSE)】。6、最后即可看到抽查号码和对应的抽查人员。另一种复杂方法如下：全部有帮助请点赞。
抽奖程序的其他程序 -
随机抽取：随机滚动显示参选者(姓名、号码、照片等)。按键方便：按回车开始滚动，按空格停止滚动，按Tab键播放颁奖音乐。名单导入：导入文本文件，或导入图片文件夹，最多可导入高达2万条。抽奖结果：自动保存抽奖结果，不惧死机断电，支持缺席等的作废处理。灵活易用：无需预先固定中奖数量，手动切换还有呢？
代码请参考附件。
求VB编写的一个学生姓名随机抽取程序 -
db, 1, 1 mCount = rs.RecordCount Randomize Timer lCurRow = Int(Rnd * mCount) + 1 '产生一个随机数 Label1.Caption = lCurRow rs.Move lCurRow - 1 '定位 Label2.Caption = rs!bh Label4.Caption = rs!xm If CheckItem01(rs!bh) Then List1.AddIt说完了。
Dim i As Long, n As Long, y As Long, x As Long, a() As Integer y = List1.ListCount n = Val(Text1.Text) '获取输入的数量，text1可以自己改 If n < 1 Then Exit Sub '输入数量不能为0 If y < n Then Exit Sub '抽取数量不能为大于已经存在姓名列表 Rando还有呢？