document.write('
Data hosted with ♥ by Pastebin.com - Download Raw - See Original
  1. \' Gambas class file
  2.  
  3. Public Sub setImagen(valor As String)
  4.   PictureBox1.Picture = Picture[valor]
  5.   PictureBox1.Stretch = True \'ajuste de las dimensiones de la imagen al tamaño del picturebox1
  6. End
  7.  
  8. Public Sub Form_Open()
  9.   Label1.text = Me.tag \'mostramos el dato pasado al formulario
  10.   Me.Center
  11. End
');