set foucus related

[ANKUSHRS1]

all i want to go from ''remark"(where "40" value inputed) textbox to "advance code" textbox which is not happening automatically. so I have use below code to fix this problem

problem is the cursor doesn't indicate starting at this box ( as screen shot shown below)

pls help

Private Sub remarks_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = vbKeyTab Then
AdvCode.SetFocus

End If
End Sub

 

[p45cal]

Attach a simple file and we can probably tweak the various controls' properties, probably TabIndex.