\' Gambas class file
Public Sub setImagen(valor As String)
PictureBox1.Picture = Picture[valor]
PictureBox1.Stretch = True \'ajuste de las dimensiones de la imagen al tamaƱo del picturebox1
End
Public Sub Form_Open()
Label1.text = Me.tag \'mostramos el dato pasado al formulario
Me.Center
End