صفات و مشخصات اشياء
مشخصات اشياء
يك ((دكمه)) و يك ((تكست باكس)) روي صفحه بياوريد. و ((فرم)) هم كه قبلا بود.
روي هر يك از اينها كه كليك بكنيد ، در پنجره پراپرتي ، مشخصات آن شي را نشان مي دهد.
يك راه ديگر هم براي ديدن مشخصات يك شي اين است كه خودمان در پنجره پراپرتي آن را انتخاب كنيم.
نام شيء
نام شيء
در پنجره پراپرتي(صفات) با كلمه
name
-------------
در پنجره پراپرتي دو لبه مشاهده مي شود. و صفات به دو روش زير هم آورده شده اند. اولي مرتب شده بر حسب حروف الفبا و دومي به شكل طبقه بندي خاص.
ولي مي بينيد كه در حالت طبقه بندي الفبايي ، نام اول آورده شده. در صورتي كه حرف ((ان)) نبايستي قبل حرف ((آ)) باشد. اين به خاطر در دسترس بودن و اهميت آن است.
اهميت نام چيست؟ اهميت نام اين است كه مثل دنياي واقعي ، هر شيء را با نامش صدا مي كنند.
شما اسمها را هر چه دوست داريد مي توانيد بگذاريد. (البته علايم خاصي ممنوع است ولي اگر با يك حرف شروع كنيد و با عدد ادامه بدهيد ، مشكلي ندارد.)
ولي توصيه شده كه اسمها با معني باشد. در مثال ما كه 3 شيء بيشتر نداريم ، نيازي به اين كار نيست ولي وقتي مثلا دكمه هاي زيادي داريم بايد اسم دكمه نشاندهنده كار آن باشد.
فعلا من دكمه را با ((سي 1)) نشان مي دهم(ابتداي نام كامند باتم). و تكست باكس را با ((تي 1)) . زيرا نمي خواهم موقع كدنويسي براي نوشتن اسم شيء ، زياد تايپ كنم. در كد نويسي براي تغيير صفات شيء ، اول اسم شي مياد ، بعدش آن صفت مورد تغيير . مثلا فاصله از چپ دكمه سي 1 ، يا متن داخل تكست باكس تي 1
اين طوري
c1.left
t1.text
تغيير اسامي
نامها را تغيير بدهيد.
حالا با استفاده از پنجره پراپرتي اسم 3 شيء را تغيير دهيد.
براي اين كار در محل نوشتن نام كليك كنيد و نام جديد را تايپ كنيد
بعد تغییر نام در قسمت بالا می بیند که اول نام ابزار یعنی new_name و سپس نوع ابزار یعنی CommandButton آورده شده.
شروع كد نويسي
يك دكمه و يك تكست باكس بر روي فرم قرار دهيد.
روي دكمه ((دابل كليك)) كنيد. پنجره اي به شكل زير باز مي شود.
البته من نام دكمه را قبلش به ((سي 1)) تغيير دادم. اسم دكمه شما جايگزين آن بايد بشه.
حالا در ميان 2 خط آن ، برنامه اي مي نويسيم.
نقل قول:
Private Sub c1_Click()
نقل قول:
t1.Text = "hello"
End Sub
شما به جاي ((t1 )) ، نام تكست باكس خود را قرار دهيد.
حالا برنامه را اجرا كنيد. يعني دكمه اجرا را بزنيد. در حالت اجرا وقتي دكمه كليك بشه، در كادر تكست باكس مي نويسه
hello
صفت بعدي : كپشن
caption
براي تغيير آن هم وارد پنجره پراپرتي شويد. البته مواظب باشيد كه كپشن فرم را به جاي آن تغيير ندهيد. يعني هميشه حواستان باشد كه صفات كدام شي در پنجره نمايش داده شده. اول شي را به درستي انتخاب كنيد ، بعد صفات را تغيير دهيد.
با اين تغيير برنامه قبلي موقع اجرا اين طور ميشه.
پاسخ به رويداد ها
در برنامه اي كه بالا نوشتيم ، دكمه به ((رويداد كليك)) پاسخ مي داد.
ليستي از رويداد هاي ديگر را مي تونيد با ((دابل كليك)) كردن دكمه و استفاده از دكمه بالا و سمت راست كادر باز شده ببينيد.
يك كارايي ديگر پنجره كد - دكمه هاي پايين
اول مواد لازم:
دو دكمه و يك تكست باكس
دوم تغييرات بر آنها(آماده سازي)
names of buttons:
c1 & c2
captions of button
hello & bye
name of textbox
t1
سوم مخلوط كردن
Private Sub c1_Click()
t1.Text = "hello"
End Sub
-------------
Private Sub c2_Click()
t1.Text = "bye"
End Sub
-------------
نتيجه اجرا:
اما چيزي كه مي خواستم از ذكر برنامه بگم ، يكي از كارايي هاي پنجره كد است. گوشه پايين - سمت چپ كادر ، ((دو دكمه)) است كه وقتي هر كدام را در حالت انتخاب قرار بدهيم ، آنچه به نمايش درميايد ، فرق مي كند.
در شكل زير من دكمه اول(سلام) را اول دابل كليك كرده ام. و بعد از كليد ديگر استفاده كردم. مي بينيد كه ((كل كدها)) نمايش داده شده.
