martes, 30 de junio de 2009

llama ventana de browse

Para el ejemplo anterior puedes llamar una ventana de browse donde buscaras el archivo imagen y el cual serà guardado en el TextBox3 y la imagen serà visualizada en el picturebox1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.ClickIf Me.OpenFileDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
Try
Me.PictureBox1.Image = Image.FromFile(OpenFileDialog1.FileName)
Me.TextBox3.Text = OpenFileDialog1.FileName
Catch ex As BadImageFormatException
MessageBox.Show("Formato incorrecto", "Error", _
MessageBoxButtons.OK, MessageBoxIcon.Error)
Catch ex As Exception
MessageBox.Show("Error al intentar abrir el archivo de imagen " _
& ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try
End If

End Sub

Comparte