29-08-18, 07:54 PM
الحمد لله بعد عدة محاولات تم التوصل الى الحل
Dim n1 As String
n1 = Text1
Image1.Picture = LoadPicture("image\" & n1 & ".jpg")
Dim n1 As String
n1 = Text1
Image1.Picture = LoadPicture("image\" & n1 & ".jpg")
