KeyCode=13(編號:2292)

有本書"visual basic 6開發聖經"
裡面寫著可將tab鍵改成enter鍵
可是卻無法使用
有誰知道
Private Sub cate_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 13 Then
Set b = Adodc2.Recordset
  b.Find "類別編號 =" & cate
  catetxt = b("類別名稱")
  id.SetFocus
End If
End Sub