请问有没有可能实现，点击按钮，就能 随机 选定组合框中的项

请教有没有可能实现，点击按钮，就能 随机 选定组合框中的项
现在有1个组合框“Combo1”，一个按钮“Command1”，我用组合框的 AddItem 方法已经给它加入了几个项，点击那个按钮，有没有可能实现随机选定那几个项中的某一项，是随机的

[解决办法]

VB code

Private Sub Command1_Click()   Combo1.ListIndex = Int(Rnd(Now) * Combo1.ListCount)End SubPrivate Sub Form_Load()  Dim i As Long  For i = 1 To 10    Combo1.AddItem "NO" & i   NextEnd Sub