Blinking Label Crashes my db

  • Thread starter Thread starter Bob Vance
  • Start date Start date
B

Bob Vance

When i try to use the function with my Control names it just keeps crashing
my DB

Then sends the error to Microsoft,



Private Sub Form_Timer()

Me!control.Visible = Not Me!control.Visible

End Sub
 
Hi Bob

Why would you want to make anything blink ?? up to you.

I think it would be best to have the blinking happen ONLY if you really want
to draw a users attntion to something - like if the age of a person is above
or below some number. BUT just to have something blinking all the time
would be not too good for a users.

Up to you

Try this

Create a text box or lable on your form call it BobsBlink
Set the back colour to 255 (red)
Put the form's timer interval to 500 (half a second - approx.)
Put this on the forms timer


Private Sub Form_Timer()
If Me.BobsBlink.BackColor = 255 Then
Me.BobsBlink.BackColor = 65535
Else
Me.blinkingLabel.BackColor = 255
End If
End Sub

As I said - up to you but ......:-)
 
Wayne thanks thats sensational, its a warning label that you have a cash
sale label on at the top of your Invoice which would not be used very
often..............Brilliant.. Now I am going to find a control that changes
the Name from Cash on to cash off each time you click it...could you point
me in the right direction..............Bob
 
I created a Label on my report "CASH SALE" its a sneaky way of invoicing
where is covers the tax numbers , but really you are meant to charge tax so
you wouldnt want to print all your invoices with "CASH SALE" at the top
hence the blinking lable on the form to let you know the the CASH SALE will
show....................Bob ;)
 
Not really sure about this but think you may be better with a message box
warning if this is a cash sale.

If you really want a blinking box then something like

if me.something = "cash sale" then
me.box name. back colour = 255
else
me.box name. back colour =16777215
End if

Or use the after update of something to set the forms timer to 500

etc
etc
etc
lots of ways to do this
 
Thanks Wayne, already had this coded............Regards Bob
Private Sub ckbCash_AfterUpdate()
Me.Requery

If ckbCash.value = True Then
lblCashSale.Visible = True

Else
lblCashSale.Visible = False
End If
End Sub
 
Wayne-I-M said:
I think it would be best to have the blinking happen ONLY if you really want
to draw a users attntion to something - like if the age of a person is above
or below some number. BUT just to have something blinking all the time
would be not too good for a users.
Click to expand...

I'd put the warning message in bold red large font. But not blinking.

Tony
--
Tony Toews, Microsoft Access MVP
Please respond only in the newsgroups so that others can
read the entire thread of messages.
Microsoft Access Links, Hints, Tips & Accounting Systems at
http://www.granite.ab.ca/accsmstr.htm
Tony's Microsoft Access Blog - http://msmvps.com/blogs/access/
 
Back
Top