urgente!!!!!!
Publicado por mariam (5 intervenciones) el 07/01/2007 10:59:09
necesito urgentemente que alguien me ayude a resolver este pequeño problema que tengo con un opendfiledialog el cual en un listbox agrego el nombre del archivo y cuando seleccione el nombre de ese archivo debe de visualizar la imagen pero no lo realiza . en el listbox solo debe visualizar el nombre del archivo, cuando seleccione ese archivo se va a concatenar con la ruta y debe visualizarse en un cuadro de imagen.lo necesito antes del 8 de enero 07 de antemano gracias, pero ayudenme!!!!!
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
OpenFileDialog1.InitialDirectory = "c:\Documents and Settings\Mariam\Mis documentos\Mis imágenes\icon\"
OpenFileDialog1.Filter = "txt files (*.txt)|*.txt|All files (*.*)|*.*"
OpenFileDialog1.FilterIndex = 2
OpenFileDialog1.RestoreDirectory = True
OpenFileDialog1.ShowDialog()
ListBox2.Items.Add(OpenFileDialog1.FileName.Substring(75))
End Sub
Private Sub ListBox2_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox2.SelectedIndexChanged
Dim a As String
a = ListBox2.SelectedItem
PictureBox1.ImageLocation = OpenFileDialog1.InitialDirectory & a
End Sub
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
OpenFileDialog1.InitialDirectory = "c:\Documents and Settings\Mariam\Mis documentos\Mis imágenes\icon\"
OpenFileDialog1.Filter = "txt files (*.txt)|*.txt|All files (*.*)|*.*"
OpenFileDialog1.FilterIndex = 2
OpenFileDialog1.RestoreDirectory = True
OpenFileDialog1.ShowDialog()
ListBox2.Items.Add(OpenFileDialog1.FileName.Substring(75))
End Sub
Private Sub ListBox2_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox2.SelectedIndexChanged
Dim a As String
a = ListBox2.SelectedItem
PictureBox1.ImageLocation = OpenFileDialog1.InitialDirectory & a
End Sub
Valora esta pregunta


0