Move cursor from textbox1 to dtpicker with enter key

[Tahr]

HI. ALL
I AM DESIGNING A INPUT FORM IN EXCEL SHEET BY USING "CONTROL TOOLBOX".
IS IT POSSIBLE TO MOVE CURSOR WITH ENTER KEY FROM TEXT BOX TO GO INTO DTPICKER FOR DATE SELECTION. I USING EXCEL 2003.

Itried using the following code;

Private Sub TextBox1_KeyUp(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = 13 Then
DTPicker1.Activate
End If
End Sub

But it does not response

THANKS.