VIDEOCLUB-CARGAR FOTOS
Publicado por OLIVIAS (1 intervención) el 30/05/2010 19:40:46
bCargarFotografia_Click
Dim ofd As New OpenFileDialog
ofd.Title = "Selecciona una foto"
ofd.Filter = "Todos (*.*) |*.*| Imagenes|*.jpg;*.gif;*.png;*.bmp"
If ofd.ShowDialog = Windows.Forms.DialogResult.OK Then
PbFotografia.Image = Image.FromFile(ofd.FileName)
End If
Dim ofd As New OpenFileDialog
ofd.Title = "Selecciona una foto"
ofd.Filter = "Todos (*.*) |*.*| Imagenes|*.jpg;*.gif;*.png;*.bmp"
If ofd.ShowDialog = Windows.Forms.DialogResult.OK Then
PbFotografia.Image = Image.FromFile(ofd.FileName)
End If
Valora esta pregunta
0