[ Visual Basic 6 ] عمل برنامج يعرض الصور

[صاحب السلاسل]

السلام عليكم ورحمه الله وبركاته

كيفكم مع البرد


حبيت اطلب منك شرح
طريقه عمل برنامج بالفيوجل بيسك


فكره البرنامج وهو اضع مجموعه من الازرار مثلا خمسه ازرار

وكل زر يفتح لى صوره
عرفتو كيف

هاذى صوره توضيحيه للمشروع

​

 

[DoDo2008]

رد: عمل برنامج يعرض الصور

في حالة استخدام Image استخدم الكود التالي

Image1.Picture = LoadPicture("C:\1.jpg")

وفي حالة استخدام PictureBox استخدم الكود التالي

Picture1.Picture = LoadPicture("C:\1.jpg")

 

[صاحب السلاسل]

رد: عمل برنامج يعرض الصور

تسلم والله يالذيب

بس انا اللى ابيه
يكون اذا ضغطت على اي زر يجيب لى الصوره يعني احط الكود برابط مباشر لصوره
مو يطلع الصور اللى بجهازي
جاري التقييم

 

[AnTiviRus7]

رد: عمل برنامج يعرض الصور

وعليكم السلآم و رحمة الله

مآشآء الله أفآدك الأخ جزآه الله خيرآ

و هذه طريقة أخرى للفآئدة

أولآ قم بإظآفة Picturebox الى الفورم و أضف الصور دآخلهآ

ثم أظف الصورة و روح إلى خصآئهآ و إبحث عن visible = False

ثم الأكوآد

Private Sub Command1_Click()
Image1.Visible = True
Image2.Visible = False
End Sub

Private Sub Command2_Click()
Image2.Visible = True
Image1.Visible = False
End Sub

الأحمر يقوم بعرض الصورة

و الأزرق يقوم بإخفآء الصورة السآبقة و هكدآ مع بآقي الصور

مثلآ
Image3.Visible = True
Image1.Visible = False
Image2.Visible = False
Image4.Visible = False

و هذآ سورس كود بسيط للتوضيح أكثر

http://www.mediafire.com/?dq1feafzqgra6wc

بالتوفيق أخوي الغآلي و العذرة على الإطآلة


​

 

[صاحب السلاسل]

رد: عمل برنامج يعرض الصور

إقتباس من : antivirus7

وعليكم السلآم و رحمة الله

مآشآء الله أفآدك الأخ جزآه الله خيرآ

و هذه طريقة أخرى للفآئدة

أولآ قم بإظآفة picturebox الى الفورم و أضف الصور دآخلهآ

ثم أظف الصورة و روح إلى خصآئهآ و إبحث عن visible = false

ثم الأكوآد

private sub command1_click()
image1.visible = true
image2.visible = false
end sub

private sub command2_click()
image2.visible = true
image1.visible = false
end sub

الأحمر يقوم بعرض الصورة

و الأزرق يقوم بإخفآء الصورة السآبقة و هكدآ مع بآقي الصور

مثلآ
image3.visible = true
image1.visible = false
image2.visible = false
image4.visible = false

و هذآ سورس كود بسيط للتوضيح أكثر

http://www.mediafire.com/?dq1feafzqgra6wc

بالتوفيق أخوي الغآلي و العذرة على الإطآلة


​

حبيب قلبي والله
تم عمل البرنامج تمام
الف شكر لك يالذيب
قليل بحقك التقييم
الله يوفقك ويسعدك وين مارحت