Question - please help !

L

Legendary

Member
Hey Guys,

If I have a few Buttons but only one should work, how do I reach that?
For example I have:

Button1
Button2
Button3
Button4

But only one of them should work and the other not, but is it important that the "right" Button is not always the same, for example first it is Button3 but next time maybe Button1.

Please Help :sign0163:
Thx Legendary:sign0013:
 

Kintara

Member
Licensed User
Longtime User
You could try to use something like

Sub AddEventToButtons
For X=1 to 3
AddEvent (Control("Button" & x),Click,""ButtonClicked")
Next
End Sub

Then when any button is pressed it goes here

Sub ButtonClicked
ButtonName=Sender.Name
Select ButtonName
Case "Button1"
Msgbox("Button1 was pressed")
Case "Button2"
Msgbox("Button2 was pressed")
Case "Button3"
Msgbox("Button3 was pressed")
End select

end sub

Hope that is of some help

Kintara
 
You must log in or register to reply here.
Menu
Log in
Register
Cookies are required to use this site. You must accept them to continue using the site. Learn more…