نقاشات تقن 211 ( فيجيوال بيسك )

[ahm10ed]

احنا قدمنا الاختبار اليوم ، جدًا سهل .

الكودات اللي ممكن تستعملها للمنتصف ..

* كود تغيير لون الخلفية :

me.backcolor=color.red
الـ me تتغير على حسب form1 أو form2

* كود اخفاء form واظهار أخرى :

me.hide
form2.show

طبعًا يتم تغيير me و form2 على حسب اللي تبيه .

* كود العمليات الحسابية :

Dim number1 , number2 , number3,result as integer

number1=textbox1.text
number2=textbox2.text
number3=textbox3.text
result = textbox4.text
result = number1/number2 *number3

لو طلب اظهار النتيجة في مربع رسالة بيكون الكود : msgbox(result)
طبعًا single لو كان عدد عشري
integer لو كان عدد صحيح
string لو كان اسم أو اي شيء
char لو كان حرف أو متغير

* كود مسح مربعات النص :

textbox1.clear
textbox2.clear
textbox3.clear
textbox4.clear

* كود عرض كلمة " مثلاً School " في msgbox

msgbox("School")

* كود إغلاق أو إنهاء :

close اغلاق
end إنهاء


موفقين ان شاء الله

[ستايش]

المشاركة الأصلية كتبت بواسطة ahm10ed

احنا قدمنا الاختبار اليوم ، جدًا سهل .

الكودات اللي ممكن تستعملها للمنتصف ..

* كود تغيير لون الخلفية :

me.backcolor=color.red
الـ me تتغير على حسب form1 أو form2

* كود اخفاء form واظهار أخرى :

me.hide
form2.show

طبعًا يتم تغيير me و form2 على حسب اللي تبيه .

* كود العمليات الحسابية :

dim number1 , number2 , number3,result as integer

number1=textbox1.text
number2=textbox2.text
number3=textbox3.text
result = textbox4.text
result = number1/number2 *number3

لو طلب اظهار النتيجة في مربع رسالة بيكون الكود : Msgbox(result)
طبعًا single لو كان عدد عشري
integer لو كان عدد صحيح
string لو كان اسم أو اي شيء
char لو كان حرف أو متغير

* كود مسح مربعات النص :

textbox1.clear
textbox2.clear
textbox3.clear
textbox4.clear

* كود عرض كلمة " مثلاً school " في msgbox

msgbox("school")

* كود إغلاق أو إنهاء :

close اغلاق
end إنهاء


موفقين ان شاء الله

شكرا لكم
انزين هو في الكتاب لوين
بس احس اللي عطتنا اياه المعلمه غير في اشياء تختلف

احس روحي مو فاهمه شي خصوصا الكودات

[ahm10ed]

المنتصف إلى إجراء المعاملات الحسابية .

يعني اللي هي يعطيك معادلة ويقول ليك سويها ..

[ستايش]

صفحه 76

وش انسوي مو فهمتنه يعني بس نحفظ والله وش السالفه ؟؟؟

[reem mohamed]

السلام عليكم ... شباب محتاج كود لزر يعمل backspace يعني عند استخدام الزر في كل مره يمسح اخر حرف موجود في ال textbox

[reem mohamed]

المشاركة الأصلية كتبت بواسطة reem mohamed

السلام عليكم ... شباب محتاج كود لزر يعمل backspace يعني عند استخدام الزر في كل مره يمسح اخر حرف موجود في ال textbox

If Len(TextBox1.Text) > 0 Then
TextBox1.Text = Mid(TextBox1.Text, 1, Len(TextBox1.Text) - 1)
End If

[ستايش]

ممكن مراجعه
يوم الأثنين تاريخ 5/20 اختباري التقن نهائي
خايفه انشالله سهل

[زوز***روز]

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

[ستايش]

سؤال من امتحان نهاية الفصل الثاني لتعليم الثانوي للعام الدراسي 2011–2012

1اذا كان عداد العمال يساوي عداد الغياب يتم تنفيذ الأتي

*تغير عنوان groupbox1الى " لا يوجد حضور "
*مسح البيانات من مربع نص عداد الغياب

2اذا كان عداد الغياب لا يساوي عداد الحضور يتم تنفيذ الأتي

نسبة الغياب =عداد الغياب/(عداد العمال*100)

الكود

dim a,b as intger
a=t1.text عداد العمال
b=t2.text ايام الغياب
if (a=b)
groupbox1.text=" لا يوجد حضور"
t2.text=" "
else
b= b/(a*100)
end if

[Ms Quiet]

مساعدة لو سمحتو

السؤال: عند تحريك مؤشر الفأرة MouseMove على Button1 يتم تغيير مؤشر الفأرة للأداة إلى Cross

شنو الكود مال تغيير مؤشر الفأرة؟

[ستايش]

المشاركة الأصلية كتبت بواسطة Ms Quiet

مساعدة لو سمحتو

السؤال: عند تحريك مؤشر الفأرة MouseMove على Button1 يتم تغيير مؤشر الفأرة للأداة إلى Cross

شنو الكود مال تغيير مؤشر الفأرة؟

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


اتروحين ل الوتون تضغطين عليه مرتين بيطلع ليش فوق رمز نفس البرق ارتوحين ليه تختارين الخاصيه موس موف وبعد اتروحين الي الخصائص تختارين cursorوبعدينcross

انشالله اللي قالته صح

[Hsn]

باجر (الأربعاء) الاختبار النهائي 2013/2014 > لي ماعنده خبر

[abcdi]

في احد بقدم تقن غيرنا الاحد
الي عنده فولدرات امتحانات لا يبخل علينا
في انتظاركم يا أصدقاء 2015

[حكايا سرمدية 98]

اهلا اهلا صديقة 2015 في موضوع مكتوب امتحانات تقن 211
بسألج الفصل 11 معانا

[abcdi]

مدري
مو كل الفصول ويانا ؟
اوردي احنا م نستخدم الكتاب :/