vb语言随机数问题vb语言中如何编程实现从7,8 ,54,69,12,32这组数字中随机产生一个数字

来源:学生作业帮助网 编辑:作业帮 时间:2024/11/08 21:05:20

vb语言随机数问题vb语言中如何编程实现从7,8 ,54,69,12,32这组数字中随机产生一个数字
vb语言随机数问题
vb语言中如何编程实现从7,8 ,54,69,12,32这组数字中随机产生一个数字

vb语言随机数问题vb语言中如何编程实现从7,8 ,54,69,12,32这组数字中随机产生一个数字
Private Sub Command1_Click()
Dim a() As String, x As Integer
a = Split("7, 8, 54, 69, 12, 32", ",")
Randomize
t = Int(6 * Rnd)
x = Val(a(t))
Print x
End Sub