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

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم أسئلة واستفسارات الأعضاء - المنتدى القديم (http://vb4arb.com/vb/forumdisplay.php?fid=94)
+--- قسم : قسم Visual Basic 6 وما قبله (http://vb4arb.com/vb/forumdisplay.php?fid=167)
+--- الموضوع : مساعده في برنامج الالوان (/showthread.php?tid=7145)

مساعده في برنامج الالوان - the viper - 26-11-12

السلام
انا اريد البرنامج يقوم بدمج الالوان عبر VScroll1 وVScroll2 وVScroll3 يقوم بكتاب الرقم حق الالوان المدمجه في تكست بوكس

البرنامج في المرفقات

وشكرا


مساعده في برنامج الالوان - عبدالله الصافي - 27-11-12

جرب ذلك أخي الكريم وأدعو الله أن يكون ما تريده.

هذه هي الأكواد والملف بالمرفقات

كود :
Dim a As Integer
Dim X As Integer
Dim y As Integer


Private Sub Command1_Click()
a = Val(VScroll1.Value)
X = Val(VScroll2.Value)
y = Val(VScroll3.Value)
Text1.Text = a + X + y
End Sub

Private Sub Form_Load()

End Sub

Private Sub VScroll1_Change()
Form1.BackColor = RGB(Val(VScroll1.Value), Val(VScroll2.Value), Val(VScroll3.Value))
End Sub

Private Sub VScroll2_Change()
Form1.BackColor = RGB(Val(VScroll1.Value), Val(VScroll2.Value), Val(VScroll3.Value))
End Sub

Private Sub VScroll3_Change()
Form1.BackColor = RGB(Val(VScroll1.Value), Val(VScroll2.Value), Val(VScroll3.Value))
End Sub

بالتوفيق

مساعده في برنامج الالوان - the viper - 27-11-12

مشكور وجزاك الله خير

اخي عبدالله عند استخدام الكود تستطيع استخدامه مره واحده فقط بعد الضغط على امر الكومندا لكن لو اجيت استخدمه مره ثانيه يجعل لون الفورم ابيض فقط لايتغير

جزالك الله خير ممكن تحلها

ربنا يوفقك في حياتك ويطول في عمر والديك

مساعده في برنامج الالوان - عبدالله الصافي - 27-11-12

تقصد أنك تريد أن تجعل الون الجديد للفورم ثابت حتي بعد غلق الفورم وإعادة تشغيله مرة أخري.

وهل تقصد بقولك (يقوم بكتاب الرقم حق الالوان المدمجه في تكست بوكس

) أن يتم كتابة الرقم في التكيست علي هذه الصورة (255,255,255).

أرجو أن لم يكن قصدك كما فهمت أن توضح أكثر.

بالتوفيق

مساعده في برنامج الالوان - ولد رائع - 27-11-12

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


لاني انا قمت بتجربته الان

مساعده في برنامج الالوان - the viper - 27-11-12

هلا باخي وصديقي ولد رائع

يسلموا اخي على التوضيح هذا ماكنت اقصده اخي عبدالله

مساعده في برنامج الالوان - عبدالله الصافي - 27-11-12

اخي الكريم لقد نسيت أن أقول لك شيء مهم,

قم بتغيير خاصيةmax للأداة VScroll إلي (255).

وأرجو حمل المرفق السابق وجربه.

مساعده في برنامج الالوان - the viper - 27-11-12

بارك الله فيك اخي عبدالله هذا هو المطلوب

وجزاك الله خير