I am trying to use the SendKeys() command to another window with my VB6 app.
SendKeys()
What I wanted is to click a button, and then have 10 seconds to go to the o
You can use this code in Module
Public Sub SendKeyTab(CForm As Form) On Error Resume Next Dim G As Single For G = 0 To CForm .Controls.Count - 1 If CForm .Controls(G).TabIndex = CForm .ActiveControl.TabIndex + 1 Then CForm .Controls(G).SetFocus Next End Sub
On Each Form Level
If KeyCode