VBA Microstation: Nggawe peta sing diwatesi
A sawetara dina kepungkur aku nuduhake carane nggawe tata letak kanggo printing nggunakake Microstation. Sadurunge opsi iki kanggo nangani sheet lan model, sampeyan kudu nindakake cara lawas, ngasilake blok (sel) lan konten kliping.
Mbalik saka menit sabbatical, contone sing aku nuduhake sampeyan wektu iki yaiku aplikasi sing dikembangake visual Basic saka Microstation, ing endi peta diwatesi digawe, utawa sawetara sertifikat cadastral nyebutake. Cocog kanggo departemen cadastre, sing kudu ngasilake peta miturut panjaluk, ing skala, layanan sing ditagih, nanging yen ora otomatis, butuh wektu suwe.
Ante kagungan video sing aku dibusak kanggo sementara, nanging kanggo tujuan pendidikan, aku ninggalake cara iki dikembangake lan disesuaikan.
Input kasebut.
- Saliyane, disambung ing tingkat pertanian
- Database Akses, ngemot kolom area, keliling, lan koordinat jangkauan. Banjur gabung menyang database liyane sing duwe jeneng wajib pajak (wong), saka kunci cadastral.
- File .cel ngemot sel bingkai (blok), skala 1: 100, simbol lor, lan simpul kanggo nambah data saka basis data. Iki kudu dilebokake ing papan sing disimpen perpustakaan terdaftar (ruang kerja / konfigurasi / sel)
Ing VBA, formulir capture digawe kanthi format topeng miturut kode cadastral kotamadya sing bakal nggunakake. Wis papan kanggo nambah pengamatan lan opsi sing bakal disisipake dadi anotasi jeneng sing nduweni, tombol kadastraka utawa nomer properti mung.
Cara iki dieksekusi
Sawise ciri wis ditetepake, tombol "generate certificate" ditetepake lan sistem nindakake operasi normal sing bakal dilakoni kanthi manual yen aplikasi ora kasedhiya.
Wiwit nganggo file anyar (karya), sistem iki nglakoni:
- Referensi nyala peta sing disambungake sing ngemot plot
- Ngetung range saka koordinat sing ana plot, kanggo netepake ukuran sing cocok
- Banjur nggawe pager ngubengi properti, kanthi ukuran sing padha karo enem properti, saengga ora kudu nggarap kabeh peta
- Banjur dheweke nggawe clip sing mung ngemot lapisan sing perlu, wates properti, nomer farm, wates apel lan jeneng dalan. Ing proses iki, operasi kanthi tuladha ditundha amerga kriteria topologis ora banget nyukupi ing peta kasebut, tinimbang ngganti centroid sing mbatesi wates-wates, sing dipindhah menyang transfer link saka wates menyang centroid lan fakta ngatur peta siji tinimbang file zona utawa quadrants nggawe analisis cumbersome.
- Banjur ngetung skala, nggawe referensi ukuran ukuran blok (sèl) 1: 100 kanggo mangerteni manawa ana panggonan sing luwih gedhe utawa luwih cilik lan panggonan sel kasebut.
- Banjur ngasilake pager ing pigura apa sing ngemot peta diwatesi, lan ngurangi keluwihan.
Asile
Ana ing kene kita duwe sertifikat kadastruktur, ing modul sing kita lebokake data kayata lembaga eksekusi proyek, logo kotamadya, wilayah sing wis ditemtokake, ukuran, nomer lembaran lan deskripsi sing kita tandha.
Ing sheet liyane, ngasilake tabel koordinat stasiun, jarak lan bantalan sing beda-beda sing digawe kanthi cepet saka pager internal ing properti, pasang titik lan sawetara vertex ing arah jarum jam saka sing ditemokake langkung mangulon. Yen perlu, amarga poligon duwe akeh simpul, ngasilake lembaran sing dibutuhake.
Kanggo kasus ekstrem, bungkus sing cedhak banget, sing cedhak karo dalan sing amba banget, banjur digawe opsi kanggo meksa skala ing ngisor iki utawa kanggo ngasilake skala 1: 125 sing sistem kasebut diwilang. Kasus conto kasebut kudu ditindakake, amarga dheweke ngerti yen tangga teparo ing pinggir dalan ora metu ing skala kasebut.
Aplikasi kasebut bisa digunakake ing Microstation Geographics V8, sanajan suwe-suwe iki rampung lan ewu perkara liyane kanggo proses kasebut ing sawijining dina aku ngarep-arep bisa ngomong.
Iku ora ana kanggo download. Nanging yen sampeyan hubungi kita, kita bisa nyetel kanggo kabutuhan.
editor@geofumadas.com
Apa sampeyan bisa ngomong ngendi aku bisa tuku macro kasebut? lan kosnto iku please? matur nuwun kanggo sampeyan
Aku dadi nyeri sirah aku kaya sing bisa ninggalake peta akurat akurat sing bener proses jajajjaja sing apik