Grazie a tutti voi più o meno il mio problema l'avete capito
e vi ringrazio, ora posto un esempi che ho fatto ma però non funziona
e non capisco il perché sicuramente la mia inesperienza in fatto di oggetti
sinceramente mai capiti , vado sempre a tentativi.
questo è l'esempio:
Private Sub txtEnd_KeyUp(sender As Object, e As KeyEventArgs) Handles txtEnd.KeyUp, txtEnd.KeyUp, txtGar.KeyUp, txtTri.KeyUp,
txtScuo.KeyUp, tztLav.KeyUp, txtNolTri.KeyUp, txtCamp.KeyUp
Dim passaScheda As TextBox() = {txtEnd, txtEnd, txtGar, txtTri, txtScuo, tztLav, txtNolTri, txtCamp}
If e.KeyCode = 13 Then
For a As Integer = 0 To 7
'x = x + 1
x = passaScheda(a).Text
'MsgBox("pippo " & x)
'Exit Sub
Next
End If
End Sub
vi chiedo gentilmente piccolo aiutino grazie 1000 comunque