‫ درس 13 : لوپ های تکرار شونده ( بخش اول ) | انجمن

مدیریت
مدیریت 24 شهریور 1396

در این تمرین، در خصوص نحوه تکرار یک کار برای تعدادی مشخص و یا تا زمانی که شرطی برقرار شود صحبت می کنیم.

در این تمرین، برای اضافه کردن لیست به combobox از لوپ استفاده می کنید. فرمی که تغییرات در ان اعمال می شود از قبل درست شده است.

1. Arcmap را باز کنید و برنامه ex07a.mxd را از فولدر chapter07  را باز کنید.

2. بر روی censusmaps کلیک کنید.

3. بر روی quick کلیک کرده تا جعبه محاوره بسته شود.

4. با کلیک بر روی منوی tools، visual basic editor را باز کنید.

5. در پنجره project، فرم frmcensus را باز کنید.

6.در فرم بالا، combobox با نام cboyears را انتخاب کنید. در پنجره properties، ویژگی style property را به 2-fmstyledropdownlist تغییر دهید.

7.بر روی فرم، combobox با نام cboclasses  را انتخاب کنید. در پنجره properties، style  را برابر با 2-fmstyledropdownlist قرار دهید.

8.در بالای پنجره project، روی view code کلیک کنید.

9.در لیست اشیا(object list) ، userform را انتخاب کنید و در لیست procedure، روی initialize کلیک کنید.

10.در رویدادinitialize، متغیر مربوط به لوپ را به صورت عدد صحیح integer معرفی کنید.

11. لوپ زیر را با مقدار اولیه 3 و مقدار ثانویه 8  اضافه کنید.

12. داخل لوپ، برای اضافه کردن آیتم به combobox، دستور زیر را اضافه کنید.

13. برای نگه داشتن مقدار شمارنده سال در اولین لوپ، متغیر عدد صحیح intyear را تعریف کنید.

ِdim intyear as integer

14. دومین لوپ را اضافه کنید. مقدار اولیه و پایانی شمارنده لوپ را از 1930 تا 2000 تعیین کنید که هر گام برابر ده سال است.

15.در داخل لوپ، برای اضافه شدن ایتم، کد زیر را اضافه کنید.

16. بعد از دو لوپ، برای تنظیم مقدار اولیه، کد زیر را وارد کنید.  بعد از اضافه کردن دو خط زیر، کد اماده اجرا است.

17. Visual basic editor را ببندید.

18. بر روی دکمه censusmaps کلیک کنید.

19. سال را بر روی 1930 و تعداد کلاس ها را برابر 7 قرار دهید.

20. بر روی makemap کلیک کنید. اکنون می توانید تغییرات نقشه را ملاحظه کنید.

21. سال را به 2000  تغییر دهید و تعداد کلاس ها را بدون تغییر قرار دهید.

22. بر روی make map کلیک کنید.

23. با کلیک بر روی quit  از برنامه خارج شوید.

24. اگر می خواهید تغییرات ذخیره شود، روی دکمه save  کلیک کنید.

ویرایش شده توسط مدیریت (24 شهریور 1396)