Private Sub txtSomething_KeyDown(KeyCode As Integer, Shift As Integer)
  If KeyCode = vbKeyReturn Then
    ' Ignore this key
    KeyCode = 0
  End If
End Sub