oppure crei 2 matrici di controlli una per le textbox una per i commandbutton
codice:Private Sub Command1_Click(Index As Integer) MsgBox Index End Sub Private Sub Text1_KeyPress(Index As Integer, KeyAscii As Integer) If KeyAscii = 13 Then Command1_Click (Index) End If End Sub

Rispondi quotando