Timer tick doesn't fire another form button click event

Question

1.00/5 (1 vote)

See more:

Hi, like title, I have a timer, that when reach 0 will fire event on another form, then timer restart, this seem to work if it's >=0 but timer can't go down except some more click, and timer fire the event but I think that in this way it's like a normal button. how can I achieve this?

What I have tried:

Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
       If Label10.Text >= "1" <= "30" Then
           Label10.Text = Label10.Text - 1.ToString
       ElseIf Label10.Text = "0" Then
           Form11.Button5_Click(sender, e)
       End If
   End Sub

Posted 17-Jan-22 9:46am

MXwell8

Updated 17-Jan-22 10:16am

v4

Add a Solution

1 solution

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Dave Kreskowiak · Accepted Answer · 2022-01-17T10:11:00

Solution 1

That code won't even compile so everything else you said about it doing something doesn't matter.

This comparison is not possible and will keep your code from compiling:

VB.NET

If Label10.Text >= "1" <= "30" Then

First, the content of a label is always a string, so you're not comparing the value of the label for something between 1 and 30.

Next, you MUST have a logical operator between comparisons. You could should look more like this:

VB.NET

Dim value = CInt(Label10.Text)
If value >= 1 And value <= 30 Then

But even that's bad. The label should just be used to displaying a value, NOT being used to store one and be made part of your apps logic.

Posted 17-Jan-22 10:11am

Dave Kreskowiak

Comments

Richard Deeming 18-Jan-22 4:25am

Actually, it will compile; it just won't do what the OP expects.

It compiles to:

if ((Microsoft.VisualBasic.CompilerServices.EmbeddedOperators.CompareString(Label10.Text, "1", false) >= 0) ? 1 : 0) >= (Microsoft.VisualBasic.CompilerServices.Conversions.ToBoolean("30") ? 1 : 0))

CompareString(x, "1", false) will return True if the string starts with a character which is greater than or equal to "1" (ASCII code 49).

Conversions.ToBoolean("30") will always return true.

So the If branch will be executed for "30", "9999", "Is this code broken?", etc.

Evil type coercion: yet another reason why VB sucks.

Dave Kreskowiak 18-Jan-22 7:11am

Wow. It's been quite a long time since I did VB.NET.