Question

我想用vb做一个随机抽人的程序，希望懂的人能帮忙解答！

如题，希望能详细点，抽取人的名字啊~~其他啥的该放到哪个地方！
由于金钱有限，只能给5了，呵呵，在线等，谢谢哈！
对不起啊(tianqing20wen)刚刚去吃饭了，现在试了一下，能抽了，但是哪个弹出来的框标题是工程1，怎样可以改变？

Answer 1

Private Sub Form_click()
Dim a(3) As String
a(0) = "小王"
a(1) = "小李"
a(2) = "小谢"
a(3) = "小林"
Randomize
MsgBox a(Int(Rnd * 4))
End Sub

不用添加任何控件 直接将代码复制进去 点击窗体即可得到效果

Answer 2

http://hi.baidu.com/luobo528/blog/item/a241a331c25c99b95edf0ed6.html
这是我给你写的元旦抽奖程序，需要的话联系我，可以定做