پرسش ها و پاسخ ها

لطفا منابع مناسب جهت مطالعه و کمک در تدریس بهتر بویژه درباره ویژوال بیسیک معرفی کنید .

کتب رشته های کامپیوتر کار و دانش و فنی و حرفه ای منابع مناسبی جهت مطالعه همکاران می باشد . به طور خاص کتاب برنامه نویسی مقدماتی (ویژوال بیسیک) رشته کامپیوتر کار و دانش و یا کتب برنامه سازی 1 ، 2 ، 3 رشته کامپیوتر فنی حرفه ای مربروط به سال های قبل از 93 – چون از سال تحصیلی جاری  در رشته کامپیوتر فنی و حرفه ای برنامه نویسی سی شارپ جایگزین ویژوال بیسیک شده است – منابع بسیار خوبی برای بخش 12 هستند .

 

روش نصب ویژوال بیسیک در ویندوز 7 و  8 را توضیح دهید ؟

برای نصب ویژال بیسیک در ویندز 7 ، کافی است به Change User Account Control Settings  در Control Panelرفته و نوار لغزنده را روی Never Notify  تنظیم نمایید . سپس جهت نصب روی Setup  برنامه راست کلیک نموده و گزینه Run as Administrator  انتخاب نمایید .

برای نصب ویژوال بیسیک در وینوز 8 ، از نسخه VB 6.0 Sp6استفاده کنید و مراحل بالا را طی نمایید .

 

در اکسل هیچ قسمتی  برای کدنویسی و استفاده از ویژوال بیسیک قابل مشاهده نیست . از کجا می‌توان این امکان را فعال کرد؟

منوی برنامه‌نویسی(Developer) در اکسل به صورت پیش‌فرض مخفی هست و می‌تونین روی ریبون نمایشش بدین. برای این کار
روی منویFILE کلیک کنید
Options رو انتخاب کنید
تبCustomize Ribbon رو انتخاب کنید
از قسمتChoose command from گزینه‌یPopular commands رو انتخاب کنید
 از قسمتCustomize the Ribbon گزینه‌یMain tabs رو انتخاب کنید
 از منوی زیر این گزینه قسمتDeveloper رو انتخاب کنید
 OK کنید تا در ریبون قسمتDeveloper رو ببینید

 

در ورد چطور می‌توانیم از فرمول‌های ریاضی مثل SUMو AVERAGEبیرون از خود جدول استفاده کنیم؟

ابتدا باید یک bookmark برای جدول تعریف کنید. برای این کار
جدول رو انتخاب کنید
از منویInsert قسمتLinks گزینه‌یBookmark رو انتخاب کنید
 یک نام برای جدول انتخاب کنید (مثلاًTabel1)
 
حالا در صفحه یک فیلد ایجاد کنید (از منویInsert قسمتText ابزارQuick Parts)
 
دکمه‌یFormula رو بزنین
 تابع مورد نظر رو از قسمتPaste function انتخاب کنید
نام جدول رو از قسمتPaste bookmark انتخاب کنید
یک فاصله وارد کنید و بعد فرمول مورد نظر رو بنویسید مثلاً A1:A3
 OK کنید

 

چطور ضرب همه‌ی اعداد یک جدول رو در ورد در انتهای جدول نمایش دهیم ؟

1- یک سطر به انتهای جدول اضافه کنید
2-  برای هر ستون کارهای زیر رو انجام بدین
آ- در خانه‌ی آخر ستون (در سطر ایجاد شده) کلیک کنید
ب- روی منویLayout کلیک کنید
پ- از قسمتData گزینه‌یformulas رو انتخاب کنید
ت- در قسمتFormula بنویسید =PRODUCT(ABOVE)
ث- OK کنید
3-  بعد از انجام همه‌ی کارهای بالا یک ستون به انتهای جدول اضافه کنید
4-  در خانه‌ی انتهایی ستون ایجاد شده کلیک کنید
5-  روی منویLayout کلیک کنید
6-  از قسمتData گزینه‌یFormulas رو انتخاب کنید
7-  در قسمتFormula در فرم باز شده بنویسید =PRODUCT(LEFT)
 8- OK کنید

حالا در خانه‌ی آخر جدول ضرب اعداد جدول رو دارین. هر دفعه که جدول رو تغییر می‌دین برای نمایش درست این ضرب رو باید رفرش کنین. برای این کار جدول رو انتخاب کنین و کلید F9رو بزنین

 

تابعCODE در اکسل چه کاربردی دارد؟

این تابع یک متن می‌گیره و مقدار عددی کاراکتر اولش رو تولید می‌کنه

=CODE("Hello") ==> 72

 

چطور از تابعOR در اکسل استفاده کنیم؟

در تابعOR می‌تونین از ۱تا ۲۵۵پارامتر ارسال کنید. این پارامترها یا باید منطقی باشند(TRUE یاFALSE) یا باید قابل تبدیل به مقادیر منطقی باشند.
1- مثلاً در صورتی که عدد به این تابع ارسال بشه. مقادیر غیرصفرTRUE و صفرFALSE در نظر گرفته می‌شه

=OR(0.2) ==> TRUE

=OR(0) ==> FALSE

این مقادیر می‌تونن محاسباتی باشن

=OR(2+1) ==> TRUE

=OR(1-1) ==>  FALSE

2- در صورتی که از متن استفاده کنید. "TRUE" یا"true" یا هر شکل دیگه‌ای از حروف بزرگ و کوچک مشابه بهTRUE و"FALSE" یا"false" یا هر شکل مشابه دیگه بهFALSE تبدیل می‌شه.
غیر از این مقادیر هر مقدار دیگه‌ای به #VALUE!تبدیل می‌شه

=OR("TruE") ==> TRUE

=OR("FALSE") ==> FALSE

=OR("1") ==> #VALUE!

در نهایت وقتی از این تابع با چند پارامتر استفاده کنید، بعد از انجام همه‌ی تبدیل‌های ممکن در صورتی که یکی از پارامترها بهTRUE تبدیل بشن مقدارTRUE و در غیر این صورت مقدارFALSE برگردونده می‌شه

=OR(TRUE, TRUE) ==> TRUE

=OR(FALSE, TRUE) ==> TRUE

=OR(TRUE, FALSE) ==> TRUE

=OR(FALSE, FALSE) ==> FALSE

=OR(TRUE, TRUE, FALSE) ==> TRUE

...


به عنوان یک مثال از مقادیر مختلف

=OR(1+1, "true", TRUE, 1-1) ==> TRUE

 

تابعIFERROR در اکسل چه کاربردی دارد؟

این تابع دو پارامتر می‌گیره و در صورتی که مقدار پارامتر اول یک اخطار باشه عبارت دوم رو به عنوان نتیجه تولید می‌کنه. در غیر این صورت خود مقدار پارامتر اول رو به عنوان نتیجه برمی‌گردونه

=IFERROR(1/2, "Devide error") ==> 0.5

چون عبارت اول یک اخطار تولید نکرده خود مقدار به عنوان نتیجه برگردونده شده یعنی 0.5

=IFERROR(1/0, "Devide error") ==> Devide error

چون عبارت اول اخطار #DIV/0تولید می‌کنه بنابراین عبارت دوم به عنوان نتیجه‌ی تابعIFERROR تولید می‌شه

 

پارامتر سوم تابعIF چه کاربردی دارد؟

پارامتر سوم مقداری هست که در صورتFALSE شدن مقدار پارامتر اول به عنوان نتیجه‌ی تابعIF برگردونده می‌شه

=IF(2>1, "Larger", "Smaller") ==> Smaller

این پارامتر اجباری نیست. در صورتی که این پارامتر وارد نشه در صورت FALSE شدن پارامتر اول یک مقدارFALSE به عنوان نتیجه‌ی تابعIF برگردونده می‌شه

=IF(1>2, "Larger") ==> FALSE

 

چطور از پارامتر دوم تابعIF در اکسل استفاده کنیم؟

پارامتر دوم دستوری هست که در صورتTRUE شدن مقدار پارامتر اول انجام می‌شه. این دستور بعد از انجام شدن یک مقدار برمی‌گردونه که این مقدار در سلول حاضر نشون داده می‌شه

=IF(TRUE, "Right here") ==> Right here

=IF(TRUE, SUM({1,2,3})) ==> 6

بنابراین می‌شه از این تابع در فرمول‌ها هم استفاده کرد

=A1 * (IF(A1>0, 1, -1))

که این فرمول قدرمطلق عدد موجود درA1 رو نمایش می‌ده

 

چطور میتوان یک ماکروی ساده و ابتدایی در اکسل ایجاد کرد ؟

 1- ابتدا قسمت کدنویسی رو فعال کنید
2- روی تبDeveloper کلیک کنید
3-  روی گزینه‌ی ماکرو کلیک کنید
4-  برای ماکروی خودتون یک اسم انتخاب کنید وCreate رو بزنید
5-  در پنجره‌ی باز شده یک تابع ظاهر می‌شه که اسم ماکروی شما رو داره
6-  در قسمت بینSub وEnd Sub می‌تونین دستورات خودتون رو بنویسین
7- مثلاً کد زیر و بنویسین

MsgBox ("سلام")

برای اجرای ماکرو می‌تونین مثلث سبز بالای ویرایشگر رو بزنین یا از منویRUN گزینه‌یRun رو انتخاب کنید

 

چطور در ورد یک کلید ترکیبی جدید برای یک ابزار ایجاد کنیم؟

1- روی منویFile کلیک کنید
2-  گزینه‌یOptions رو انتخاب کنید
3- گزینه‌یCustomize Ribbon رو انتخاب کنید
4-  از پایین فرم دکمه‌یCustomize رو کلیک کنید
5- در فرم باز شده از قسمت سمت چپ منوی اصلی یا شاخه‌ی اصلی رو انتخاب کنید
6- در قسمت سمت راست ابزار مورد نظر رو انتخاب کنید
7- در قسمتPress new shortcut key کلیک کنید
8- کلید ترکیبی مورد نظر رو فشار بدین
9- گزینه‌یAssign رو بزنین.

 

چگونه میتوان رنگ پيكسل ها درویژوال بیسیک بدست آورد ؟

براي بدست آوردن كد رنگ پيكسل در vb6 از متد   Point استفاده مي كنيم،اين كد رنگ پيكسل مورد نظر رو به صورت كد html برمي گرداند كه براي تبديل اون به  RGB بايد ازfunction استفاده كرد
شكل كلي دستور به شكل زير است :Object.point(x,y)                   

مثال:

Dim color as string
Color=picture1.point(100,200)

در اينجا كد رنگ پيكسل مورد نظر در متغير ريخته شده و قابل استفاده است، براي استفاده از اين رنگ كافي است که يك پيكسل رو با همين رنگ در جاي ديگر روشن كنيم كه با متد pset امكانپذير است
مثال

Picture2.pset(100,200),color

در اينجا يك پيكسل در مكان مورد نظر با رنگي كه قبلا در متغيرcolor ذخيره كرده بوديم روشن خواهد شد.

 

برای Stretch كردن تصوير درpicture box چه باید کرد ؟

براي اين كار اول در ليست تنظيماتpicture box گزينه يauto redraw رو فعال كنيد.
حالا برايpicture box يك تصوير انتخاب كنيد.اين كار را مي شود هنگام اجراي برنامه و توسط رويدادLoad picture نيز انجام دهید
سپس درون يك رويداد خاص مثل فشردن Command button كد زير رو بنويسيد

Picture1.PaintPicture (picture1.picture,0,0,picture1.width,picture1.heig ht)

مي بينيد كه تصوير به اندازه يpicture box در اومد و دقيقا مثل خاصيتstretch كنترل خواهد بود  image box 

 

چگونه می توان از قفل كردن برنامه در حلقه هاي تكرار جلوگیری کرد ؟

از كلمه يDoEvents در حلقه ي تكرار و قبل از next يا loop   استفاده کنید .

شیوه اجرای کلینیک مجازی

به اطلاع کاربران گرامی می رساند  که یکی از برنامه های عملیاتی گروه رایانه در سال تحصیلی  95-94 اجرای طرح کلینیک مجازی  با هدف پاسخگویی به سوالات تخصصی می باشد . گروه رایانه نظری استان قم این طرح را به صورت اینترنتی از طریق  سامانه پاسخگویی الکترونیکی و به صورت تلفنی از طریق طرح صدای معلم اجرا خواهد نمود .

 

سامانه پاسخگویی الکترونیکی که توسط گروه رایانه برای تمامی گروه ها ی متوسطه راه اندازی و برای تمامی سرگروه های آموزشی صفحه دسترسی اختصاصی ایجاد شده است . همکاران می توانند با مراجعه به این سامانه  و ثبت سوالات خود ، کد رهگیری دریافت کنند و پس از بررسی سوال و پاسخگویی توسط سرگروه ، با استفاده از کد رهگیری پاسخ را دریافت نمایند.

      آدرس سامانه پاسخگویی الکترونیکی  : http://eanswer.qomgt.ir

 

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