منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
المساعدة في استدعاء الصورة بالمسار - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : المساعدة في استدعاء الصورة بالمسار (/showthread.php?tid=22309)

المساعدة في استدعاء الصورة بالمسار - khaled12345 - 29-10-17

السلام عليكم الاخوة الاعزاء

برجاء المساعدة في عرض الصورة في ال picturebox

بناءا علي ال textbox الخاص بالاسم

ومسار الصورة موجود في الجدول تحت عنوان photo


يعني المطلوب عرض الصورة يناءا علي المسار

ملاحظة: لم استطيع وضع الصور في المشروع لانها ثقيلة جدا
ولكن يوجد ملف داخل المشروع اسمه    photo

المشروع في المرفق

مع جزيل الشكر لحضراتكم

RE: المساعدة في استدعاء الصورة بالمسار - a.ahmed - 29-10-17

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 


RE: المساعدة في استدعاء الصورة بالمسار - khaled12345 - 29-10-17

(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 


الله يعطيك العافيه يا هندسة

مع جزيل الشكر لحضرتك