Private Sub Command13_Click()
Data1.Refresh
Data1.Recordset.AddNew

[ho da porre questo problema, sul click del Command13 come faccio a passare sul TabIndex 0]

End Sub
ciao