有本書"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
裡面寫著可將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
請先 登入 以發表留言。