06/08/22 22:26:52
>>120
button2押しても止まらないときがあるような・・・
>>135
スロットっぽくしたいんじゃないの？
ちなみに俺が言いたかったのは、Timer1_Tickで
Do
a = CInt((52 * Rnd()) + 1)
b = CInt((52 * Rnd()) + 1)
Loop Until a <> b
Label1.Text = a
Label2.Text = b
まぁ、選びなおしは停止するタイミングでやった方がいいかもね
06/08/22 22:26:52
>>120
button2押しても止まらないときがあるような・・・
>>135
スロットっぽくしたいんじゃないの？
ちなみに俺が言いたかったのは、Timer1_Tickで
Do
a = CInt((52 * Rnd()) + 1)
b = CInt((52 * Rnd()) + 1)
Loop Until a <> b
Label1.Text = a
Label2.Text = b
まぁ、選びなおしは停止するタイミングでやった方がいいかもね