如何用VB抽签

将a(3)标注为字符串

A(0) =“小王”

A(1) =“小李”

答(2) = "小谢"

A(3) =“小林”

使不规则化

MsgBox a(Int(Rnd * 4))

末端接头

直接复制代码，不添加任何控件，点击表单即可获得效果。