noBeepEnter

Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = Asc(vbCr) Then
KeyAscii = 0
End If
End Sub

'Quando si avvia il programma la pressione del tasto [Enter] non

'produrra' piu' il beep.