KeyUp Event never executes 2

[InsaneProgrammer]

I use the code below to make sure the user has entered a UserName and Password before enabling the OK button. I have used this exact code in other applications and it works fine. In the current application I'm developing this code never executes. The Form_KeyUp event never gets called. Anyone have an idea what might cause this? Is it possible that I need to add a reference or something?

Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)
If txtUserName.Text = "" Or txtPassword.Text = "" Then
cmdOK.Enabled = False
Else
cmdOK.Enabled = True
End If
End Sub

 

[RAtkison]

Make sure the KeyPreview Property of the form is set to True.
RKA

 

[dannyh]

You might be better putting it on the KeyPress event. As far as I can remember not all keys (function keys etc) dont fire the keyDown and KeyUp events.

Dan.

 

[tbuch]

Insane,
Why not use the textbox change event? You could use something like this:

Private Sub txtUserName_Change()
If txtUserName <> &quot;&quot; And txtPassword <> &quot;&quot; Then
   cmdOK.Enabled = True
Else
   cmdOK.Enabled = False
End If
End Sub

Private Sub txtPassword_Change()
If txtUserName <> &quot;&quot; And txtPassword <> &quot;&quot; Then
   cmdOK.Enabled = True
Else
   cmdOK.Enabled = False
End If
End Sub

A little more code, but it works.
--tbuch