如何在visual basic中选择随机文本?

时间:2015-05-04 12:35:15

标签: visual-studio-2010 vba text random

我从按钮创建了自己的框,文本0到getupperbound(1),现在我想随机选择其中一个。

2 个答案:

答案 0 :(得分:0)

要获得两个数字之间的随机整数(Min和Max,包括),请执行以下操作:

Function GetRandomNumber(ByVal Min As Integer, ByVal Max As Integer) As Integer
    Randomize
    GetRandomNumber = Int(Rnd * (Max - Min + 1) + Min)
End Function

答案 1 :(得分:0)

首先,您需要确保按钮具有相同的名称和索引属性。 然后,您需要随机化按钮索引,然后在按钮阵列上使用它。

Dim index as Integer
Randomize
index = Round(Rnd*getupperbound(1)) ' a random index
'Do something with Button(index)
index = Round(Rnd*getupperbound(1)) 'Another random index
'Do something with Button(index)