Question

VB中怎么让窗体随机出现啊！！！求高手指教

如果一个工程有四个窗体，在单击第一个窗体的command时如何实现随机打开剩下的三个中的一个啊

Answer 1

在第一个窗体的按钮事件中用RND随机函数来判断随机数 从而实现随机打开后面的三个窗体

Private Sub Command1_Click()
i = Int(Rnd * 3) '随机生成0\1\2
If i = 0 Then
Form2.Show
ElseIf i = 1 Then
Form3.Show
ElseIf i = 2 Then
Form4.Show
End If
End Sub

Answer 2

MDI中的窗口还是普通的form窗口？

Private Sub Command1_Click()
‘窗体1
Select Case Int(Rnd() * 3)
Case 0
Form4.Show
Case 1
Form2.Show
Case 2
Form3.Show
End Select
End Sub

窗体2上的代码

Private Sub Command1_Click()

Select Case Int(Rnd() * 3)
Case 0
Form4.Show
Case 1
Form1.Show
Case 2
Form3.Show
End Select

End Sub

窗体3上的代码：
Private Sub Command1_Click()

Select Case Int(Rnd() * 3)
Case 0
Form4.Show
Case 1
Form2.Show
Case 2
Form1.Show
End Select
End Sub
窗体4上的代码：

Private Sub Command1_Click()

Select Case Int(Rnd() * 3)
Case 0
Form1.Show
Case 1
Form2.Show
Case 2
Form3.Show
End Select
End Sub

追问

不行啊，我也是这样弄的，可是每次运行出现物品的顺序都一样

追答

因为只有三个商品，而且是随机的，所以出现协同可能是33%.
上面的应试是可以的，多少个会代码的朋友都说可以。
当然思路可以换一下，不一定非要多个窗口。
可以是多个pictrue，通过改变层次一显示。

Answer 3

随机出商品时判断一下，如果与当前的一样，就再随机，直到不重复为止。

Answer 4

为什么要随机啊 你可以指定哪一个啊

追问

设计一个猜商品价格的游戏，不能每次商品出现顺序都一样，所以要随机

追答

有人回答了

追问

不行啊，我就是那样设计的，可是每次都是出同一个

追答

可以的啊 我试过啊

追问

每次运行程序商品出现的顺序都不变

追答

我不太明白你什么意思 你不同 商品是在不同的form上嘛

追问

一个商品一个FORM，

追答

那那个代码是可以的呀 可能因为你只有3个form 所以它出现的概率大点 还有你只需要在一个窗体上写下面的代码 比如说form1 点form1的按钮随机出现234form 不需要每个都写