VB - Question (macro) - NextGenUpdate

04-19-2013, 08:17 PM #1

SataQ

Space Ninja

818

Posts

3,127

Reputation

1

Credits

Member

Apr 2012

NextGenUpdate

(adsbygoogle = window.adsbygoogle || []).push({}); Hey Guys, I decide to make a macro for LoL and I decided to make it in Visual Basic so I made the timer with buttons
and a progress bar and everythings works fine but now the problem is I don't know how to bind keys to buttons.
ex. if you press 'F5' the timer starts again.

And oh does anyone how much 'interval' = 6 minutes ?

Thanks

-SataQ

(adsbygoogle = window.adsbygoogle || []).push({});

04-19-2013, 09:02 PM #2

Pichu

PICHU.

6,550

Posts

34,645

Reputation

8

Credits

Former Staff

Jan 2011

NextGenUpdate

Originally posted by SataQ

Hey Guys, I decide to make a macro for LoL and I decided to make it in Visual Basic so I made the timer with buttons
and a progress bar and everythings works fine but now the problem is I don't know how to bind keys to buttons.
ex. if you press 'F5' the timer starts again.

And oh does anyone how much 'interval' = 6 minutes ?

Thanks

-SataQ

Not on a computer but,

1 second = 6000ms
6 minutes = 600000ms

You can use the SendKeys.Send

To bind, I'll have to come back to you for that as that is an event and I can't remember off the top of my head.

04-19-2013, 09:07 PM #3

SataQ

Space Ninja

818

Posts

3,127

Reputation

1

Credits

Member

Apr 2012

NextGenUpdate

Originally posted by Pichu

Not on a computer but,

1 second = 6000ms
6 minutes = 600000ms

You can use the SendKeys.Send

To bind, I'll have to come back to you for that as that is an event and I can't remember off the top of my head.

I am going to try that I will let you know how it worked out Happy

07-25-2013, 12:00 PM #4

Oneup

Guest

n/a

Posts

n/a

Reputation

n/a

Credits

Member

Once upon a time...

NextGenUpdate

Originally posted by SataQ

I am going to try that I will let you know how it worked out Happy

You can also do something like this:

    

    Dim altkey As Boolean

    Dim k As Boolean

    Dim y As Boolean

    Private Sub Timer2_Tick(sender As System.Object, e As System.EventArgs) Handles Timer2.Tick



        altkey = GetAsyncKeyState(Keys.LMenu)

        y = GetAsyncKeyState(Keys.Y)



        If altkey And y = True Then

         'o code here



        End If





    End Sub

08-18-2013, 06:31 PM #5

Sonoro

I like anteaters

1,149

Posts

27,603

Reputation

130

Credits

Former Staff

Mar 2012

NextGenUpdate

Originally posted by Pikachu

Not on a computer but,

1 second = 6000ms
6 minutes = 600000ms

You can use the SendKeys.Send

To bind, I'll have to come back to you for that as that is an event and I can't remember off the top of my head.

360000ms is 6 minutes, do you even math mate? tears

08-18-2013, 06:46 PM #6

Pichu

PICHU.

6,550

Posts

34,645

Reputation

8

Credits

Former Staff

Jan 2011

NextGenUpdate

Originally posted by xSonoro

360000ms is 6 minutes, do you even math mate? tears

Dope

You must login or register to view this content.

Did that on my iTouch.