در این تمرین، ما تابعی را برای تبدیل کیلوگرم به پاند ایجاد می کنیم. ما در نوار ابزار crime analysis این تابع را فراخوانی می کنیم.
1. برنامه arcmap را باز کرده و ex06d.mxd را از فولدر chapter06 باز می کنیم.
2. منوی ابزار را کلیک کرده و visual basic editor را باز کنید.
3. در پنجره project، بر روی crimeAnalysisTasks کلیک کرده و کد آن را باز کنید.
4. وقتی CrimeanalysisTasks فعال باشد، منوی insert را کلیک کرده و روی procedure کلیک کنید.
5. در جعبه محاوره ای AddProdure، kilogramTopound را تایپ کنید. برای نوع، function را انتخاب کنید و نوع تابع به صورت public در نظر بگیرید.
6. Ok را کلیک کنید.
7. در لیست آرگمان تابع kilogramtopound ، dblkilos as double را بین دو پرانتز وارد کنید.
8. نوع خروجی تابع را به صورت double در نظر بگیرید که به صورت زیر اعمال می شود.
9.در داخل تابع، برای تغییر واحد کد زیر را در تابع وارد کنید.
10.بر روی نوار ابزار crime analysis، راست کلیک کنید و کد را باز کنید.
11.در داخل تابع kilostopounds ، کد زیر را برای تعریف متغیر و مقدار دهی اولیه اضافه کنید.
12.کد زیر را برای تعریف متغیر مقدار پوند اضافه کنید.
13.برای گزارش مقدار وزن تبدیل شده، کد زیر را اضافه کنید.
14. visual basic editor را ببندید.
15. در نوارابزار crime analysis، روی kilostopounds را کلیک کنید.
16. در جعبه محاوره، عدد 14 را تایپ کنید و سپس بر روی ok کلیک کنید.
17. بر روی ok کلیک کنید.
18. اگر می خواهید تغییرات ذخیره شود، روی دکمه save کلیک کنید.
