VBA flsahpб а: белгилүү картаны чыгаруу

Бир нече күн мурун ал пайда болорун көрсөткөн басып чыгаруу калыптары Microstation колдонуп. Листтер жана моделдер менен иштөө үчүн мындай вариант болгонго чейин, аны блокторду (уячаларды) жана кесиндилерди жаратып, эски ыкма менен жасаш керек болчу.

Менин мүнөт кайра эс алууБул жолу мен көрсөткөн үлгү боюнча иштелип чыккан колдонмо Visual Basic де Microstation, анда чектелген карта түзүлөт же кандайдыр бир кадастрдык сертификат деп аталат. Кадастрдык бөлүмдөр үчүн идеалдуу, алар кардарлардын талабы боюнча масштабда түзүшү керек, алар үчүн кызмат талап кылынат, бирок автоматташтырылбаса, көп убакытты талап кылат.

Анте убактылуу алынып сюжет бар, бирок, бул жерде билим берүү максаттары үчүн мен бул иштелип чыккан жана жекече кантип таштап.

Inputs.

• А Чийууго байланышкан чарба деңгээл
• Мамычанын, периметрдин жана диапазондун координаттарын камтыган Access маалымат базасы. Андан кийин кадастрдык ачкычтан баштап салык төлөөчүлөрдүн (адамдардын) аты-жөнү жазылган башка маалымат базасына кошулуңуз.
• Берилиштер базасынан алынган маалыматтарды топтоо үчүн 1: 100 масштабы, түндүк белгиси жана түйүндөрү бар рамка уячасы (блок) камтылган .cel файлы. Бул катталган китепканалар сакталган жерге (иш мейкиндиги / конфигурация / уяча) коюлушу керек

VBAда муниципалитеттин кадастрдык кодексине ылайык маска форматындагы басып алуу формасы жасалган. Анын ичине байкоолорду жана параметрлерди кошууга орун бар чечмелөө ээлеринин аттары, жер каттоо негизги же имарат саны.

ал чуркайт эле.

белгиленген өзгөчөлүктөрү кийин, "күбөлүк топтоо" жана система нормалдуу иш кылат кол колдонмо баскычын ээ болгон эмес, учурда кысымга алынып жатат деп.

ал жаңы File (иш) иштейт бери, система төмөнкүдөй кылат:

• участогун камтыган Call шилтеме карта шилтемеленген
• участогун камтыган координаттары диапазону эсептеп, тиешелүү масштабын коюуга
• Андан алты жер өлчөмү менен бирдей менен мүлкүн тегерегине тосмо, жараткан, бүт карта менен иштөө үчүн качыш үчүн
• Андан кийин ал чыгарат клип Ал гана зарыл болгон жер участоктордун чектерин, чарбада, алма чектерин жана көчө аттары катмарларынын сандарды камтыган жатат. Бул жараянда, операция мисал убакытты талап, себеби, топологиялык критерийлер, ошондой эле, бул карталарды, оордук борбору менен байланыштыруучу ордуна оордук борбору үчүн этегине Тийишүүдөн которо мажбурлоо, чек байланышы үчүн ылайыктуу эмес, жана негизи болуп саналат зоналар же бурап кыйынчылыкта анализ кылып, анын ордуна бир карта билэни башкаруу.
• Андан кийин шилтеме Блоктун көлөмү (клетка) деңгээл 1 даярдоо, масштабын эсептейт: 100 унун бул тоголок, же ийнеликтей ичке кылып, клетканы жерге билиш үчүн.
• Андан кийин белгилүү Картада эмне контекстинде бир коргонду жаратат, жана ашыкча кесип.

натыйжасы.

Биз аны да, долбоор, айылдык логотиби, эсептелген аймакта, масштабы, жалбырак саны жана сүрөттөө үчүн маалыматтар модулу аткаруучу орган катары киргизилген кайсы бир кадастрдык күбөлүк, көрсөтүлөт.

Экинчи баракта касиетке ички тосмодон учуп келип чыккан ар кандай станциялардын, аралыктардын жана подшипниктердин координаттарынын таблицасын жаратыңыз, ал жайгашкан жеринен сааттын жебеси боюнча бир чекитти жана бир катар чокуну жайгаштырыңыз. андан ары батыш. Керек болсо, көп бурчтуктун чокулары көп болгондуктан, керектүү шейшептерди жаратыңыз.

Өтө жакын учурларда, өтө кең көчөнүн жанында турган посылкалар үчүн, төмөнкү шкаланы мажбурлоо же система эсептеген 1: 125 масштабын түзүү үчүн варианттар түзүлгөн. Мисалдагы окуя ушуну жасоону талап кылат, анткени алар көчөнүн аркы өйүзүндөгү коңшулардын мындай масштабда чыкпагандыгын көрүшөт.

Колдонмо Microstation Geographics V8де иштейт, бирок убакыттын өтүшү менен бул жасалып, ошол процессте миңдеген нерселер жасалып, бир күн сүйлөйм деп үмүттөнөм.