24-06-20, 06:17 PM
السلام عليكم اخوتي الأعزاء انا استخدم هذا الفنكشن لجلب الصوره في بيتشر بوكس هل يمكن التعديل عليه ليجلب أكثر من صيغه
كود :
Public Function GetImage2(path As String) As Image
Dim bmp As Image
Dim fs As New IO.FileStream("Data\" & path & ".jpg|.png", IO.FileMode.Open, IO.FileAccess.Read)
bmp = Image.FromStream(fs)
fs.Close()
fs = Nothing
Return bmp
End Function