Advertisement
jsbsan

controlBox

Apr 7th, 2014
3,308
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
GAMBAS 0.76 KB | None | 0 0
  1. Public Sub Form_Open()
  2.   ''NOTE: Pongo valores iniciales, esto se pueden modificar segun lo que escriba el usuario
  3.   TextBox1.text = "escriba aqui!!!"
  4.  
  5.   TextEdit1.wrap = True
  6.   TextEdit1.RichText = "<h1>Hola</h1> <font color=\"blue\"> azul </font>  <u><font color=\"red\"> rojo subrayado </font></u>"
  7.   TextArea1.wrap = True
  8.   TextArea1.Text = "Texto largo que se puede mostrar en el control completamente"
  9.  
  10.   MaskBox1.Mask = "##0<.##0<.##0<.##0<" 'para introducir un IP
  11.  
  12.   ValueBox1.value = 23.44
  13.  
  14.   DateBox1.Value = Date(2014, 1, 28)
  15.  
  16. End
  17.  
  18. Public Sub ButtonBox1_Click()
  19.   Print "has pulsado el boton del ButtonBox"
  20.   'aqui abririas un formulario o cuadro de dialog para obtener datos
  21.   '.....
  22.   '.....
  23.   ButtonBox1.text = "Pulsado Boton!!"
  24. End
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement