از الف تا ی

اولین کدنویسی

در قسمت قبل ما تنها یک دکمه طراحی کردیم و به کد خودساخته ی آن نظری انداختیم ولی اکنون میخواهیم کمی کد به آن اضافه کنیم.

ماوستان را روی خط خالی بین دو عبارت Privte Sub و end Sub قرار دهید و کد زیر را تایپ کنید :

 

Dim number1 As Integer
Dim number 2 As Integer
Dim answer As Integer

 

number1 = 3
number2 = 5

 

answer = number1 + number2

MsgBox answer

 بعد از تایپ تمامی کد ، پنجره کد شما شبیه زیر خواهد بود.

قبل از اینکه بررسی کنیم که چه اتفاقی افتاده ، کارتان را ذخیره و سپس اجرا کنید. برنامه ی شما اجرا خواهد شد یک بار روی دکمه ی وسط فرم کلیک کنید تا نتیجه را ببینید.

برنامه را متوقف کنید و به محیط طراحی برگردید اگر نمیتوانید فرم را ببینید مثل شکل زیر تب design را انتخاب کنید

خیلی خوب ، ولی چه اتفاقی افتاد ؟ ما تنها یک برنامه نوشتیم که دو عدد را با هم جمع کند و در Message Box (جعبه پیغام) نتیجه ی آن را نمایش دهد.

اکنون بیایید تا کمی کد را بشکافیم :

ابتدا ما برای تعریف متغیر از Dim استفاده کردیم و سپس به متغیر یک نام دادیم (number1) و گفتیم که میخواهیم تا متغیر مقادیر Integer (عددی) را در خود ذخیره کند.همین کار را یز برای ساخت دو متغیر دیگر انجام دادیم.

بعد از ساخت سه متغیر کار زیر را انجام دادیم :

به ویژوال بیسیک گفتیم که مقدار Number1 عدد 3 و مقدار number2 عدد 5 باشد و برای ریختن مقدار در آنها از نماد مساوی (+) استفاده کردیم ولی میدانیم که این نماد به معنای واقعی مساوی نیست بلکه یک عملگر برای واریز مقدار است.

number1 = 3
number2 = 5

 قسمت بعد کمی پیچیده تر شد البته نه خیلی پیچیده . چیزی که میخواستیم انجام شود جمع کردن دو عدد بود. بنابر این گفتیم :

number1 + number2

 ویژوال بیسیک خود میداند چگونه دو عدد را با هم جمع کند کافی است تا ما از عملگر جمع کردن یعنی + استفاده کنیم.ویژوال بیسیک به مقدار ذخیره شده در number1 و number2 نگاه میکند و میبیند که یکی 3 و دیگری 5 است سپس با دیدن نماد جمع کننده آنها را با هم جمع میکند.

جز این ما کار دیگری را نیز انجام دادیم. ما گفتیم وقتی که دو عدد را جمع کرد نتیجه ی آن را در یک متغیر دیگر بنام answer بریزد.

answer = number1 + number2

 در اینجا اول طرف راست تساوی کار میکند و سپس نتیجه ی آن را با استفاده از نماد = در سمت چپ یعنی answer میریزد.

قسمت آخر از MessageBox (جعبه ی پیغام) که به طور built-in (خودساخته) در ویژوال بیسیک قرار دارد برای نمایش نتیجه استفاده میکنیم.ما بعداً در مورد جعبه ی پیغام بیشتر خواهیم دانست ولی فعلا فکر کنید که یک راه مفید برای نمایش دادن نتیجه است.

جعبه های پیغام  برای نمایش نتیجه ی کدها بسیار سودمند هستند ولی ما یک Textbox (جعبه متن) در فرم داریم و میخواهیم از آن استفاده کنیم.

پس خط MessabeBox answer را پاک کنید و به جای آن textbox1 را تایپ کنید سپس یک نقطه بعد از آن تایپ کنید تا یک لیست افتادنی ظاهر گردد. این لیست شامل Proerties (خصوصیات) و method (شیوه) هایی است که یک textbox (جعبه پیغام) میتواند از آنها استفاده کند.

این لیست را به پایین بپیمایید تا کلمه ی Text را ببینید. روی آن دبل کلیک کنید تا لیست ناپدید شود ( این لیست یک لیست هوشمند بسیار مفید است و میتوانید بدون وارد کردن حرفی خاصیت ممکن شی را در آن انتخاب کنید).

خاصیت Text که شما آن را انتخاب کردید همان خاصیتی است که پیشتر در Properties window (پنجره خواص) آن را تغییر دادید. حال ما این خاصیت را با استفاده از کد نشاندیم. قبلا ما در هنگام طراحی این کار را کردیم و اکنون نتیجه مثل همان است یعنی میتوان با استفاده از یک متغیر نیز خاصیت Text را تغییر داد.

برای نشاندن یک مقدار کافی است تا نماد = را بنویسیم سپس مقداری را برای خاصیت Text جعبه متن قرار دهیم.

ما میخواهیم تا محتویات answer در جعبه متن نمایش یابد بنابراین نتیجه ی کد اینگونه خواهد بود:

Textbox1.Text = answer

پنجره ی کد شما باید شبیه به زیر شده باشد:

کد خود را دوباره اجرا کنید و سپس روی دکمه ی وسط فرم کلیک کنید ، میبینید که عدد 8 در جعبه متن به نمایش درآمده است.

 ok وقت تمرین های شما رسیده است ، زیاد هم زجرآور نیستند.

آنها به شما ایده های بهتری میدهند تا یهتر بدانید که یک متغیر چیست به علاوه برنامه نویسی به عمل کردن است نه حرف زدن، پس به سوی آنها خواهیم شتافت.

تمرین

عددهای 3 و 5 را پاک کنید و عدد انتخابی خود را جایگزین آنها کنید.

تمرین

نماد مثبت (+) را در بین numebr1 و number2 پاک کنید و یکی از نماد های زیر را جایگزین آن کنید :

- (علامت منفی)

* (علامت ضرب کردن که نشان آن در vb ستاره است)

/ (علامت تقسیم صحیح که نشان آن در vb اسلش است)

تمرین

یک variable unteger (متغیر عددی) دیگر بسازید و نام آن را number3 بگذارید و عدد 10 را در آن قرار دهید.

متغیر را در متغیر answer ضرب کنید و نتیجه را در جعبه متن نمایش دهید.

(راه دیگری هم برای نشاندن مقدار برای متغیر در همان ابتدا وجود دارد. یعنی شما میتوانید اینگونه عمل کنید:

Dim number3 As Integer = 10

 این کد دقیقا به معنای زیر است :

Dim number3 As Integer

number3 = 10

 شیوه ای را که از آن استفاده میکنید موجب ترقی شما میشود ولی نتیجه همان خواهد بود که داشتیم.

در درس بعد ما نوعی دیگر متغیر بنام string (رشته) خواهیم داشت

درس قبل (افزودن کد به دکمه)

درس بعد...



نظرات شما عزیزان:

نام :
آدرس ایمیل:
وب سایت/بلاگ :
متن پیام:
:) :( ;) :D
;)) :X :? :P
:* =(( :O };-
:B /:) =DD :S
-) :-(( :-| :-))
نظر خصوصی

 کد را وارد نمایید:

 

 

 

عکس شما

آپلود عکس دلخواه:


چهار شنبه 18 خرداد 1390برچسب:visual basic 2010,آموزش وی بی دات نت, الفبا