كيف أصنع عداد على vb

(clock)والله اذا كنت اعرف كنت ساعدتك وفكرتك مره حلوه وإن شاء الله حسعى فيها;)

اكتب هذا الكود

بداخل تايمر مثلا او حلقة تكرارية

timer1

static A as intger

a=a+1

if a>=100 then

A =0

cls

end if

circle (me.scalewidth/2,me.scaleheight/2),A

end sub

وهذا هو عبارة عن مثال نستخدم فيه متغير من النوع الاستاتيكى يبدأ من الواحد حتى الميه واذا كان يساوى الميه سوف يتم اعادته الى الصفر واستخدمنا العداد هنا حتى يزداد مساحة نصف القطر للدائرة بمعدل منتظم

وان لم تستطع الاستفاده من فكرة هذا العداد ارسل الى ما تريد عمله بالتحديد وان شاء الله سوف اساعدك بقدر ما استطيع

عسلامة

مشكوووووووووووووووور يا أخ مبرمج مصرى

لكن عندي مشكلة الكود لم يعمل فالرجاء وضع صفحة الvb

تفضل أخي

brogressbar.rar

عسلامة

مشكووور يا أخ ساحر النت

و عيدك مبروك