Ciao ragazzi, vi espongo velocemente il mio problema.
Ho la necessità di incrementare tre numeri (n1, n2, n3) tramite un ciclo for next:
Con l'appplicazione Console, tutto a meraviglia: riuscivo a vedere lo sviluppo del tipo:
1 2 3
2 3 4
3 4 5
.. .. ..
7 8 9
Avendo fatto le necessarie modifiche per poter trasformare il mio codice in una applicazione windows ho il seguente problema:
Di tutto lo sviluppo visualizzo solo gli ultimi valori raggiungibili da n1, n2, n3 ( 7, 8, 9 nell'esempio)
Dove sbaglio?
Ecco il codice!
Public Class Form1
Private Sub ToolStripButton1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles ToolStripButton1.Click
Dim n1, n2, n3 As Integer
For n1 = 1 To 5
For n2 = 2 To 6
For n3 = 3 To 7
tb1.Text = (n1 & n2 & n3)
Next
Next
Next
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs)
Handles MyBase.Load
End Sub
Private Sub ToolStripButton2_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles ToolStripButton2.Click
End Sub
Private Sub tb1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs)
Handles tb1.TextChanged
End Sub
End Class
L'oggetto ToolStripButton1 è il pulsante che avvia i vari cicli for next, mentre tb1 è la textbox :)
Grazie in anticipo! 