Advertisement
jsbsan

group y last

Apr 19th, 2014
2,072
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
GAMBAS 0.33 KB | None | 0 0
  1. ' Gambas class file
  2.  
  3. Public Sub _new()
  4.  
  5. End
  6.  
  7. Public Sub Form_Open()
  8.  
  9. End
  10.  
  11. Public Sub AgruparBotones_Click()
  12.  
  13.   Print Last.text 'nos muestra en la consola el texto del boton que hemos pulsado
  14.   Label1.text = "boton pulsado es el " & Last.text 'nos muestra en la etiqueta el texto del boton que hemos pulsado
  15.  
  16. End
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement