Visual Basic - DTPicker1 controlar el enter

como se controla el enter en un dtpicker yo lo puse asi, pero no
hace nada.

Private Sub DTPicker1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
KeyAscii = 0
txtconcepto.SetFocus
End If
End Sub

lo que podrías hacer es anticiparte a la tecla poniendo en siguiente código

Private Sub DTPicker1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyReturn Then 'ojo el vbKeyReturn = 13
keycode=0
End If
End Sub