[VB 2008] Formattazione dei numeri

[B3STYL3]

Ciao ragazzi..
Ho bisogno di generare numeri casuali minori di mille che siano scritti come

0001
0010
0100

e non come 1, 10 e 100.. ho già provato con:

Dim i As Integer

For i = 1 To 999
Textbox2.Text = Format(i, "00#")
Next i

(i numeri devono essere generati dal textbox 2 al 6° e ho riscritto il codice, cambiando ovviamente il numero del textbox..)
Ma non funge! Non so che fare..

[MarcoGG]

Ho bisogno di generare numeri casuali minori di mille che siano scritti come

0001
0010
0100

e non come 1, 10 e 100.. ho già provato con:

Dim i As Integer

For i = 1 To 999
Textbox2.Text = Format(i, "00#")
Next i



Quelli non sono numeri. Se desideri una formattazione come quella, la puoi ottenere solo se interpreti il numero come Stringa.
Il che significa, aiutandosi con una ListBox :
For i As Integer = 1 To 999
ListBox1.Items.Add(i.ToString.PadLeft(4, "0"))
Next
;)

[B3STYL3]

Quelli non sono numeri. Se desideri una formattazione come quella, la puoi ottenere solo se interpreti il numero come Stringa.
Il che significa, aiutandosi con una ListBox :
For i As Integer = 1 To 999
ListBox1.Items.Add(i.ToString.PadLeft(4, "0"))
Next
;)

Appena posso provo! grazie =)
ma.. per intenderci.. funziona x un keygen?! =D

[MarcoGG]

Appena posso provo! grazie =)
ma.. per intenderci.. funziona x un keygen?! =D

Basta solo che generi i numeri "casuali", li converti in Stringa, con PadLeft() accodi gli zeri, li metti in N TextBox... e hai fatto il KeyGen. ;)