- Tambahkan statement Imports MapInfo.Mapping sebelum nama Class Form
- Tambahkan MapControl pada form (nama MapControl adalah MapControl1 secara default)
- Tambahkan Maptoolbar pada from dan set property MapControl pada MapToolBar à MapControl1
- Tambahkan event form load pada form
- Buat Path Direktori tempat dimana peta berada
Dim PathPeta As String
PathPeta = “C:\LatihanMapXtreme2005\Peta\”
- Tentukan nama peta yang akan ditampilkan
Dim NamaPeta As String
NamaPeta = “Indonesia.tab”
- Buat sebuah MapTableLoader untuk menampilkan peta pada MapControl dan masukan variable path direktori serta nama peta yang akan ditampilkan
Dim LoadPeta As New MapTableLoader(PathPeta & NamaPeta)
- Load peta ke MapControl
MapControl1.Map.Load(LoadPeta)
Ditulis oleh Gito Wahyudi