推 clifflu:設陣列作記錄 重覆就重選. 140.112.212.129 06/14
推 cerebrum:王國榮的 VB.NET 教本有一模一樣的 ^^" 140.127.38.86 06/14
嗯..那我現在做成這樣了...
Private Sub cmd_ok_Click()
Dim x(1 To 6)
Randomize
For i = 1 To 6
x(i) = Int(Rnd * (43 - 0))
If x(i) = 0 Then
i = i - 1
End If
Next i
Tx1.Text = x(1)
Tx2.Text = x(2)
Tx3.Text = x(3)
Tx4.Text = x(4)
Tx5.Text = x(5)
Tx6.Text = x(6)
End Sub
但是他TEXT顯示出來的數字會重複...
要如何讓他不重複...
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 220.142.1.210