مسااااااعدة منشان اللله

[عاشق سراب 88]

مرحبايا جماعة لو سمحتو بدي حدا يساعدني في عمل برنامج بالفيجوال بيسك 6

عوا عبارة عن ساعة رقمية
بس لازم تكون بالاقتران

وبدي حدا يقلي كيف اقدر اعمل ظهور نص عند لمس نصآخر مشكوووووورين
بس بسرعة لانو والله يوم 2/5 في امتحان علي بهادول ومش عارف شو اسوي
وشكرا

[يــس]

المرجو أخي توضيح المطلوب لأني ما فهمتك

شكرا لك

[عاشق سراب 88]

اخي العزبز
المطلوب برنامجين
الاول يكون ساعة رقمية يعني ساعة تعطيك نفس توقيت الجهاز
بس لازم تكون بالفنكشن اي الاقتران
اما البرنامج التاني
هوا مش برنامج بس حدا يقلي عندما يكون عندي شكل ازا لمسه الماوس يظهر نص عندي
يعني عندمااضع مؤشر الماوس على نقطة او شكل او نص يظهر عندي نص تاني او شكل
ارجو يكون صار في توضيح وارجو المساعدة

[يــس]

تفضل أخي هذا المشروع تجد فيه ماتريد ان شاء الله

من هنا (http://up.9q9q.net/up/index.php?f=a84b54qMm)

بالتوفيق

[عاشق سراب 88]

تعت الماوس كيف بقدر ما اخليه text
يعني على هيئة text
ارجو الرد بسرعة

وممكن طلب اخير كيف اقدر اخلي الليبل ما الو لون خلفية
يعني فاضية تكون الخلفية

وعنجد مجوووووووووووود رائع تسلمووووووووووووووو كتير كتير كتير

[يــس]

السلام عليكم
أخي لم أفهم تساؤلك الأول المرجو التوضيح

بالنسبة لكيفية جعل خلفية الLabel شفافة :
قم بتغيير هذه الخاصية BackStyle=0 -Transparent
أو أدرج الكود التالي في Load الفورم :
Label1.BackStyle = 0

بالتوفيق

[عاشق سراب 88]

اخي انا اول شي بشكرك على مجهودك ثانيا
انا ظبط معي كل اشي بس فاضل شغلة وحدة
كيف بدي اخلي النص الي ظهر عندي يختفي بمجرد انو الماوس تحرك من على الليبل الي انا زضعت عليه المؤشر لحتى يظهر
ارجو اني اكون وضحت الصورة

[يــس]

السلام عليكم
نعم أخي وضحت الصورة
لأظهار نص في Textbox عند المرور بالماوس فوق Label:
Private Sub Label1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Text1.Text = "Your text here"
End Sub
لأخفاءه :
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Text1.Text = ""
End Sub

بالتوفيق

[عاشق سراب 88]

فعلا تسلمووووووووووو كتير
زبطت معايا
عنجد لولاك اخي ما كنت راح اعمل شي

تسلمووو كتير
ودمت لجميع الاعضاء
شكرا

[يــس]

بارك الله فيك أخي الكريم
نحن في الخدمة :)

بالتوفيق