按键精灵随机生成100以内的四个数字,并且这四个数字互不相等

Question

按键精灵 随机生成100以内的 四个数字,并且 这四个数字互不相等

Answer 1

Randomize
a = Int(100 * Rnd)
Rem bb
Randomize
b = Int(100 * Rnd)
If b=a then
Goto bb
EndIf
Rem cc
Randomize
c = Int(100 * Rnd)
If c=a or c=b then
Goto cc
End If
Rem dd
Randomize
d = Int(100 * Rnd)
If d=a or d=b or d=c then
Goto dd
End If
MessageBox a
MessageBox b
MessageBox c
MessageBox d
按键9 怎么没分呀.