درود،میهمان گرامی ورود ثبت نام لیست اعضا تقویم راهنما جستجوجستجو
بازیابی رمز



آخرین ارسال ها
درمان غیر دارویی دندان درد
شروع کننده:فرشاد شاه آخرین ارسالفرشاد شاه پاسخ ها:0 مشاهده:1
اقدامات پيشگيرانه و مداخله گرايانه براي کنترل اعتياد
شروع کننده:فرشاد شاه آخرین ارسالفرشاد شاه پاسخ ها:0 مشاهده:1
تاثير لبنيات در كاهش سنگ كليه
شروع کننده:فرشاد شاه آخرین ارسالفرشاد شاه پاسخ ها:0 مشاهده:1
مواظب « کریستال مت» ها باشید!!
شروع کننده:فرشاد شاه آخرین ارسالفرشاد شاه پاسخ ها:0 مشاهده:1
آب درمان بسیاری از بیماری ها
شروع کننده:فرشاد شاه آخرین ارسالفرشاد شاه پاسخ ها:0 مشاهده:2
دمای بدن چگونه کنترل میشود؟
شروع کننده:فرشاد شاه آخرین ارسالفرشاد شاه پاسخ ها:0 مشاهده:2
چرا نوشیدن الکل زیانبار است؟
شروع کننده:فرشاد شاه آخرین ارسالفرشاد شاه پاسخ ها:0 مشاهده:2
ترك سيگار اشتهاي سيگاري‌ها را بهبود مي‌بخشد
شروع کننده:فرشاد شاه آخرین ارسالفرشاد شاه پاسخ ها:0 مشاهده:2
سن شيوع بيماريهاي قلبي در ايران يك دهه زودتر از كشورهاي غربي
شروع کننده:فرشاد شاه آخرین ارسالفرشاد شاه پاسخ ها:0 مشاهده:2
چگونه سرفه كودكان را تسكين دهيم؟
شروع کننده:فرشاد شاه آخرین ارسالفرشاد شاه پاسخ ها:0 مشاهده:2
سندرم تخمدان پلي کيستيک باعث ايجاد پرمويي و آکنه خواهد شد
شروع کننده:فرشاد شاه آخرین ارسالفرشاد شاه پاسخ ها:0 مشاهده:2
شيوع حالت غم و اندوه پس از زايمان در 40 درصد موارد شايع است
شروع کننده:فرشاد شاه آخرین ارسالفرشاد شاه پاسخ ها:0 مشاهده:3
از وضعيت تري گلسيريد خونتان خبر داريد؟
شروع کننده:فرشاد شاه آخرین ارسالفرشاد شاه پاسخ ها:0 مشاهده:5
جايگزيني مرجان به جاي استخوان
شروع کننده:فرشاد شاه آخرین ارسالفرشاد شاه پاسخ ها:0 مشاهده:3
راديوگرافي در ماههاي اول بارداري مي‌تواند كودكان را با مشكل شنوايي مواجه كند
شروع کننده:فرشاد شاه آخرین ارسالفرشاد شاه پاسخ ها:0 مشاهده:3
عدم استفاده از عينك آفتابي مناسب احتمال ابتلا به ‌آب‌مرواريد را 3 ‌برابر افزايش مي‌ده
شروع کننده:فرشاد شاه آخرین ارسالفرشاد شاه پاسخ ها:0 مشاهده:3
مصرف سيگار از علل مهم ابتلاي افراد به سينوزيت است
شروع کننده:فرشاد شاه آخرین ارسالفرشاد شاه پاسخ ها:0 مشاهده:4
استفاده از قليان به اندازه استعمال ‌20 نخ سيگار خطر دارد
شروع کننده:فرشاد شاه آخرین ارسالفرشاد شاه پاسخ ها:0 مشاهده:3
خشونت طولاني صدا و بدون علت شايع‌ترين علامت بروز سرطان حنجره است
شروع کننده:فرشاد شاه آخرین ارسالفرشاد شاه پاسخ ها:0 مشاهده:4
چرا ما ابرو داریم؟
شروع کننده:فرشاد شاه آخرین ارسالفرشاد شاه پاسخ ها:0 مشاهده:2
اثر سبزيجات بر مغز سالمندان
شروع کننده:فرشاد شاه آخرین ارسالفرشاد شاه پاسخ ها:0 مشاهده:3
ديدن غذاهاي موردعلاقه موجب بهبود كارآيي مغز مي شود
شروع کننده:فرشاد شاه آخرین ارسالفرشاد شاه پاسخ ها:0 مشاهده:4
اگزما بيشتر جنبه ارثي دارد استرس باعث تشديد بيماريهاي پوستي مي‌شود
شروع کننده:فرشاد شاه آخرین ارسالفرشاد شاه پاسخ ها:0 مشاهده:3
مصرف داروهاي اعصاب و روان در دوران بارداري منجر به شکاف لب نوزاد مي‌شود
شروع کننده:فرشاد شاه آخرین ارسالفرشاد شاه پاسخ ها:0 مشاهده:3
در حين رويش دندان‌هاي نوزادان از دندان‌گير استفاده نكنيد
شروع کننده:فرشاد شاه آخرین ارسالفرشاد شاه پاسخ ها:0 مشاهده:3
چگونه از ابتلا به سكته قلبي جلوگيري كنيم؟
شروع کننده:فرشاد شاه آخرین ارسالفرشاد شاه پاسخ ها:0 مشاهده:3
این 10 نکته را در ماه رمضان برای گرفتن روزه فراموش نکنید!!!
شروع کننده:فرشاد شاه آخرین ارسالفرشاد شاه پاسخ ها:0 مشاهده:3
چرا داروی سرطان تاکنون کشف نشده است؟
شروع کننده:فرشاد شاه آخرین ارسالفرشاد شاه پاسخ ها:0 مشاهده:6
گرما به تسكين درد كمك مي‌كند
شروع کننده:فرشاد شاه آخرین ارسالفرشاد شاه پاسخ ها:0 مشاهده:4
اثر كم خوني بر ذهن و بدن
شروع کننده:فرشاد شاه آخرین ارسالفرشاد شاه پاسخ ها:0 مشاهده:5
گالری مدل آرایش صورت
شروع کننده:aria آخرین ارسالelina_mn پاسخ ها:70 مشاهده:31631
مدل طراحی ناخن
شروع کننده:elina_mn آخرین ارسالelina_mn پاسخ ها:17 مشاهده:221
مدل آرایش چشم
شروع کننده:mina آخرین ارسالelina_mn پاسخ ها:117 مشاهده:14779
شستن دست ها با آب گرم مرگ ومیر کودکان زیر 5 سال را کاهش می دهد
شروع کننده:silent boy آخرین ارسالsilent boy پاسخ ها:0 مشاهده:13
چطور به کودکان شستن دست را آموزش دهیم؟
شروع کننده:silent boy آخرین ارسالsilent boy پاسخ ها:0 مشاهده:9
با شستن دست از بیماری جلوگیری کنید
شروع کننده:silent boy آخرین ارسالsilent boy پاسخ ها:0 مشاهده:6
اسکناس های کثیف موجب انتقال بیماری کچلی می شوند
شروع کننده:silent boy آخرین ارسالsilent boy پاسخ ها:0 مشاهده:8
راه های پیشگیری از سرما خوردگی
شروع کننده:silent boy آخرین ارسالsilent boy پاسخ ها:0 مشاهده:8
تفاوتهای سرماخوردگی ، آنفلوآنزای فصلی و H1N1
شروع کننده:silent boy آخرین ارسالsilent boy پاسخ ها:0 مشاهده:9
لنزهای تماسی برای کنترل قند خون
شروع کننده:silent boy آخرین ارسالsilent boy پاسخ ها:0 مشاهده:6
چند توصیه برای شستشوی پوست خود
شروع کننده:silent boy آخرین ارسالsilent boy پاسخ ها:0 مشاهده:5
محلی برای طرح سوالات و مشکلاتی که به ان برخورد میکنید
شروع کننده:admin آخرین ارسالadel پاسخ ها:419 مشاهده:22208
آدامس جویدن عامل تشدید نفخ در دستگاه گوارش است
شروع کننده:silent boy آخرین ارسالsilent boy پاسخ ها:0 مشاهده:5
کافی شاپ آواکسی ها
شروع کننده:adel آخرین ارسالadel پاسخ ها:101 مشاهده:1146
انرژی نقطه صفر و معادله دیراک
شروع کننده:silent boy آخرین ارسالsilent boy پاسخ ها:0 مشاهده:5
اتحاد نیروها و نظریه سی. پی. اچ.
شروع کننده:silent boy آخرین ارسالsilent boy پاسخ ها:0 مشاهده:4
تجدید آزمایش سرعت نوترینوها/ تلاش برای اثبات یا رد سرعت بالاتر از نور در ذرات بنیادین
شروع کننده:silent boy آخرین ارسالsilent boy پاسخ ها:0 مشاهده:4
داوران ترک ديدار ايران و آلباني را قضاوت مي کنند
شروع کننده:adel آخرین ارسالadel پاسخ ها:0 مشاهده:4
زندگینامه بزرگان
شروع کننده:silent boy آخرین ارسالsilent boy پاسخ ها:10 مشاهده:33
****امشب سایت ها ده دقیقه تعطیل می شوند***
شروع کننده:adel آخرین ارسالadel پاسخ ها:0 مشاهده:6
ارتباط البرت انیشتین با آیت الله بروجردی
شروع کننده:adel آخرین ارسالadel پاسخ ها:0 مشاهده:4
اسامي ممنوعه در سازمان ثبت احوال
شروع کننده:adel آخرین ارسالadel پاسخ ها:0 مشاهده:6
درياچه شيلي در كمتر از 24 ساعت ناپديد شد!
شروع کننده:adel آخرین ارسالadel پاسخ ها:0 مشاهده:3
بيانيه‌ دفتر موسيقي ارشاد درباره خواننده هتاک
شروع کننده:adel آخرین ارسالadel پاسخ ها:0 مشاهده:5
شهادت دو زن ايراني در حمله به زائران در عراق
شروع کننده:adel آخرین ارسالadel پاسخ ها:0 مشاهده:2
واکنش آیت الله جوادی آملی به رژه همجنس بازان در آذربایجان
شروع کننده:adel آخرین ارسالadel پاسخ ها:0 مشاهده:4
برگزاری تجمع بزرگ عزاداران امام هادی (ع) و کفن پوشان حضرت رقیه (س)
شروع کننده:adel آخرین ارسالadel پاسخ ها:0 مشاهده:6
سیم‌کارت‌های رایتل فعلا خرید و فروش نمی‌شوند
شروع کننده:adel آخرین ارسالadel پاسخ ها:0 مشاهده:5
اعلام زمان بندی اچ تی سی برای عرضه بروز رسانی اندروید 4 تعدادی از اسمارت فون های این
شروع کننده:adel آخرین ارسالadel پاسخ ها:0 مشاهده:4
استفان هاوکینگ چگونه حرف می‌زند؟
شروع کننده:silent boy آخرین ارسالsilent boy پاسخ ها:0 مشاهده:7
رصدخانه مراغه، میراث جاویدان
شروع کننده:silent boy آخرین ارسالsilent boy پاسخ ها:0 مشاهده:5
تولید نانوساختارهای ستاره ای شکل
شروع کننده:silent boy آخرین ارسالsilent boy پاسخ ها:0 مشاهده:5
می‌دانید چند سنگ آسمانی زمین را تهدید می‌کنند؟
شروع کننده:silent boy آخرین ارسالsilent boy پاسخ ها:0 مشاهده:3
هوانوردی
شروع کننده:silent boy آخرین ارسالsilent boy پاسخ ها:0 مشاهده:4
بشقاب پرنده؛ از واقعیت تا خیال
شروع کننده:silent boy آخرین ارسالsilent boy پاسخ ها:0 مشاهده:4
حیات منظومه شمسی، درون یک حباب است!
شروع کننده:silent boy آخرین ارسالsilent boy پاسخ ها:0 مشاهده:4
انواع موشک های کروز
شروع کننده:silent boy آخرین ارسالsilent boy پاسخ ها:0 مشاهده:4
گنج‌های فضایی مال کیست؟
شروع کننده:silent boy آخرین ارسالsilent boy پاسخ ها:0 مشاهده:4
حدس می زنید این عکس کجاست؟
شروع کننده:silent boy آخرین ارسالsilent boy پاسخ ها:0 مشاهده:5
حمله پرندگان خشمگین به فضا
شروع کننده:silent boy آخرین ارسالsilent boy پاسخ ها:0 مشاهده:4
ماه، مقصر غرق شدن کشتی تایتانیک بوده است!
شروع کننده:silent boy آخرین ارسالsilent boy پاسخ ها:0 مشاهده:4
اندازه گیری دقیق روشن ترین ذرات ریز اتمی جهان
شروع کننده:silent boy آخرین ارسالsilent boy پاسخ ها:0 مشاهده:4
آخرین پرواز ارابه های الهام بخش فضایی
شروع کننده:silent boy آخرین ارسالsilent boy پاسخ ها:0 مشاهده:4
روند پیرشدن فضانوردان آهسته تر می شود
شروع کننده:silent boy آخرین ارسالsilent boy پاسخ ها:0 مشاهده:4
تولید کاتالیست های ارزان و زیست سازگار
شروع کننده:silent boy آخرین ارسالsilent boy پاسخ ها:0 مشاهده:5
بررسی حیات زمینی در برخی کوتوله های سرخ
شروع کننده:silent boy آخرین ارسالsilent boy پاسخ ها:0 مشاهده:4
جدیدترین معمای کیهانی: کهکشان‌های نخستین چند ستاره داشتند؟
شروع کننده:silent boy آخرین ارسالsilent boy پاسخ ها:0 مشاهده:4
تالس
شروع کننده:silent boy آخرین ارسالsilent boy پاسخ ها:0 مشاهده:4
پلاسمون کوانتومی در نانوذراتی در ابعاد اتمی
شروع کننده:silent boy آخرین ارسالsilent boy پاسخ ها:0 مشاهده:4
ابن سینا و گذر زهره
شروع کننده:silent boy آخرین ارسالsilent boy پاسخ ها:0 مشاهده:4
title title title title title
آموزش پرورش اندام در 90 روز دستبندوگوشواره ماه تولد شما آموزش افزایش قد (کتاب و سی دی) جدیدترین روش بستن شال و روسری برنامه مشاهده همه شبکه های دنیا


ارسال پاسخ 
چهار عمل اصلی با Command Bottun
نویسنده پیام
MoonLover

ناظم ارشد انجمن
******

ارسال ها: 18,519
تاریخ عضویت: 29 December 2008
امتیاز: 147
تشکرهای ارسالی : 16674
تشکرهای دریافتی : 26116
اعتبار: 202  واحد
1
چهار عمل اصلی با Command Bottun
چهار عمل اصلی با Command Bottun
برنامه اي بنويسيد كه دو عدد را گرفته حاصل چهار عمل اصلي را بر روي آنها اجام داده و نتيجه را چاپ نمايد . با تغيير هر كدام از جعبه متن ها جعبه متن نتيجه خالي شده و با كليك بر روي دكمه هاي فرمان حاصل در جعبه متن نتيجه نشان داده شود .

حل : وارد محيط ويژوال بيسيك شده و پروژه جديدي را شروع كنيد و سه جعبه متن و سه برچسب (Label) و چهار دكمه فرمان در روي فرم قرار دهيد. اشياي تغيير نام يافته به صورت زير خواهند بود .




اسامی اشیای تغییر نام یافته به صورت زیر است :
1- Txt1 2- Txt2 3- TxtResault 4- CmdJam
5- CmdTafrig 6- cmdZarb 7- cmdTagsim
كد برنامه به صورت زير خواهد بود
کد:
Private Sub Form_Load()
Label1.Caption = "Adadeh Avval"
Label2.Caption = "Adadeh Dovvom"
Label3.Caption = "Haseleh Jam"
txt1.Text = ""
txt2.Text = ""
txtResault.Text = ""
CmdJam.Caption = "Jam"
CmdTafrig.Caption = "Tafrig"
cmdZarb.Caption = "Zarb"
cmdTagsim.Caption = "Tagsim"
End Sub
Private Sub txt1_Change()
txtResault.Text = ""
End Sub
Private Sub txt2_Change()
txtResault.Text = ""
End Sub
Private Sub CmdJam_Click()
txtResault.Text = Val(txt1.Text) + Val(txt2.Text)
Label3.Caption = "Haseleh Jam"
End Sub
Private Sub CmdTafrig_Click()
txtResault.Text = Val(txt1.Text) - Val(txt2.Text)
Label3.Caption = "Haseleh Tafrig"
End Sub
Private Sub cmdZarb_Click()
txtResault.Text = Val(txt1.Text) * Val(txt2.Text)
Label3.Caption = "Haseleh Zarb"
End Sub
Private Sub cmdTagsim_Click()
If Val(txt2.Text) <> 0 Then
txtResault.Text = Val(txt1.Text) / Val(txt2.Text)
Else
txtResault.Text = "Khatayeh Tagsim Bar Sefr"
End If
Label3.Caption = "Haseleh Tagsim"
End Sub

امضاء گاهی باید فراموش کرد..
به زودی میام..امتحان دارم فعلا!
آفلاین
Monday 20 June 2011 15:09 نقل قول این ارسال در یک پاسخ
ارسال پاسخ 


پرش به انجمن:


کاربرانِ درحال بازدید از این موضوع: 3 مهمان
زمان کنونی: Friday 25 May 2012, 00:13