Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Chriss Miller on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Blinking Cursor 1

Status
Not open for further replies.

toptech

Programmer
Apr 12, 2001
71
US
HiThere.

Does anyone out there know how to make the cursor blink when you Tab into a field.

Thanks in advance.

Jeff
Top Tech Systems

Top Tech Systems

If you help 3 people and each one of those help 3 other people and so on, imagine all the people being helped.
 
My cursors blink already, but you can use the timer event to do a lot of different things. This makes the whole text box "blink"
Code:
Public blnCtrlHasFocus

Private Sub [b]Form_Timer()[/b]
  If blnCtrlHasFocus Then
    Me.Text10.BackStyle = -1 * (Me.Text10.BackStyle) + 1
  'Toggles the backstyle from (0 Transparent to 1 normal
  End If
End Sub

Private Sub Text10_GotFocus()
  blnCtrlHasFocus = True
End Sub

Private Sub Text10_LostFocus()
  blnCtrlHasFocus = False
End Sub
Set the forms timer property to 1000, (1000 milliseconds equals 1 second)
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top