الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

Loadpicture لا تعمل داخل حلقة تكرار ؟؟

بدأه bababa في 20 ديسمبر 2008 · 4 رد · 607 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

شباب عندي مشكلة مع دالة loadpicture عندما اقوم باستخدامها داخل حلقة تكرار حيث ان عملية اظهار الصورة لا تتم الا بعد انتهاء الحلقة !!!

سواء باستخدام for او do while او do until

اليكم الكود وارجوا حل المشكلة في اقرب وقت 

do until v=200



v= inp(...)



if v=100 then



image.picture=loadpicture( "file name")



elseif v=50 then

image.picture=loadpicture( "file name")



.



.



.



endif ' or by using switch 



loop



end

لا تظهر الصورة بعد تنفيذ البرنامج الا بعد تحقق شرط انتهاء الحلقة والصورة التي تظهر هي اول صورة ادخلت قيمتها في v

اتمنى ايجاد حل للمشكلة

تم تعديل هذه المشاركة بواسطة bababa في 20 ديسمبر 2008 في 04:55

#2

أخي العزيز، المشكلة هي أنه يعرض الصورة التي تحقق الشرط V=50 ولكنه يتابع في زيادة الV حتى يصل إلى المئة، فيعرض الصورة التي تحقق الشرط V=100 بدلاً من الصورة السابقة.

لحل المشكلة يمكنك استعمال الأمر Exit Do ليخرجك من الحلقة التكرارية في حال تحقق الشرط، يعني:

ElseIf V=50 Then
Image1.Picture=LoadPicture(FileName)
Exit Do
End If

وفقك الله

هذه الجملة خاطئة  :wacko: 


#3

حلت المشكلة بعمل فاصل زمني قبل امر الادخال

تم تعديل هذه المشاركة بواسطة bababa في 20 ديسمبر 2008 في 13:30

#4

أرجو أن تكتب أخي الطريقة التي استعملتها، لكي تفيد الآخرين الذين يطلعون على الموضوع.

هذه الجملة خاطئة  :wacko: 


#5

استخدم الأمر DoEvents بعد LoadPicture

سبحان الله وبحمده ... سبحان الله العظيم

مواضيع مشابهة