29-10-17, 10:27 PM
(29-10-17, 10:20 PM)a.ahmed كتب :PHP كود :
Private Sub TextBox1_TextChanged(ByVal sender As Object, ByVal e As EventArgs) Handles TextBox1.TextChanged
Dim path As String = "D:\photo\\"
Dim fn As String = path & "\" & TextBox1.Text & ".png"
PictureBox1.Image = Nothing
Dim pngfn As String = fn
If IO.File.Exists(pngfn) Then PictureBox1.Image = Image.FromFile(pngfn)
End Sub
الله يعطيك العافيه يا هندسة
مع جزيل الشكر لحضرتك

