随机抽取的，也不要放弃，都去试试，提高奖池含虾量。每个人都去，保不准就抽中虾，发挥人多优势，铺开！我们人头那么多，机会肯定大一点吧，大家都来尝试，随机抽的，只要是真随机，抽也能抽中肖战粉丝，比例在哪放着呢，每个都冲！提高基数！其实我从未中过奖，但万一呢，哈哈，没准话剧之前，我就见他了呢，想想都兴奋。超话签到发红贴互兔VB之夜投票养铁整点九宫格养号抢票帖点赞转发，肖战的VB互动。
1、如何用VB从指定的数里生成出个随机数第一个问题：你可以先这几个数放丰一个数组中，然后随机生成一个下标，不就行了。第二个问题：你在窗体上画两个按钮Command1、Command2、一个Timer控件Timer1、一个标签Label1。Timer1的Enabled属性设为False，Interval设为100。双击Command1，写下列代码：Timer1.EnabledTrue。
2、VB中如何让取随机数Int((upperboundlowerbound 1)*Rnd lowerbound)upperbound是上限的意思，lowerbound是下限的意思，根据你的要求来指定数字比如我要一个0到10的随机数。Int((upperboundlowerbound 1)*Rnd lowerbound)upperbound是上限的意思，lowerbound是下限的意思，根据你的要求来指定数字比如我要一个0到10的随机数Randomize初始化随机数种子text1int(rnd*(100 1) 0)。
3、如何从数据库中随机抽取不重复数据Adodc1.RecordSourceselecttop1*from学生表orderbyrnd(id)，随机1个Adodc1.RecordSourceselecttop10*from学生表orderbyrnd(id)，随机10个。form_load()获取所有学生名字到一个数组，按钮事件产生随机数（根据数组大小）作为索引获取学生名字，并将该名字从数组删除（用一个中间数组做过度）。