-2

vb.net を使用して一意のランダムな 6 桁の番号を生成する方法はありますか? 重複した乱数はありませんか?

次のコードを試しましたが、「Type Char has no contructors」と表示されます

Dim chars As String = "0123456789"
Dim word As Char() = New Char(6)
Dim rnd As New Random()
For i As Integer = 0 To word.Length - 1
word(i) = chars.Chars(rnd.Next(chars.Length))
Next
TheTextBox.Text = New String(word)
4

3 に答える 3

6

これでいいんじゃない?意味はnumber、レコードごとに、またはそれが使用されているものは何でもインクリメントします。一意であることを保証します。

Dim number as integer = 100000
'do stuff
number +=1
于 2013-07-11T20:08:53.407 に答える
2

試す..

Dim randomNumber As Integer

Randomize() 

randomNumber = Int((100000* Rnd()) + 1) 

MsgBox(randomNumber)
于 2013-07-11T20:30:56.417 に答える