No matter how small a project may be, it’s always a good idea to polish it up.
By that I mean do things like:
Check the tabbing sequence to be sure it makes sense and is easy to use. Many people don’t like to use a mouse and will knock you program if the order is screwy.
It’s not a bad idea to add a button to start again or reset your app. Make it the last in the tab order and have it Set Focus to the first position of the tab order.
Private Sub cmdReset_Click()
Text1.SetFocus
End Sub
Using GotFocus, its nice to select all the text in the text box automatically, so you can just start typing and not have to manually select and delete what ever is already there.
Private Sub Text1_GotFocus()
SendKeys "{home}+{end}"
End Sub
The same thing can be done, when a text box is clicked on:
Private Sub Text1_Click()
SendKeys "{home}+{end}"
End Sub
Using this will terminate the program if the “esc” key is hit after the program first loads.
Private Sub Form_KeyPress(KeyAscii As Integer)
If KeyAscii = 27 Then
Unload Me
End If
End Sub
Try to use the “ALT + Under Lined Letter” on every command button to execute that sub from the keyboard. Its made available by placing an “&” before the Letter you want to use for this purpose in the “Caption” property for that button.
Really just a few simple tricks, which can make your program look and feel much more professional.
I hope some find this helpful!




Reply With Quote