formularioparaMostrarimagenes

' 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