Untuk menampilkan data yang ada pada Tabel Data Peta MapInfo ke dalam aplikasi Visual Basic dapat dilakukan dengan kode program berikut :
mapinfo.Do "Run application """ + CariAppDir + "skripsiku1.wor" + """"
mapinfo.Do "select nama_jalan from jalankotayogya into TEMP_WORK"
nRows = Val(mapinfo.eval("tableinfo(TEMP_WORK, " + Str$(TAB_INFO_NROWS) + ")"))
mapinfo.Do "fetch first from temp_work" 'move first
For i = 1 To nRows 'isian list jalan > FCariJalan
Me.Combo1.AddItem mapinfo.eval("temp_work.nama_jalan")
mapinfo.Do "fetch next from temp_work" 'move next
Next
mapinfo.Do "close table temp_work"
mapinfo.Do "close table selection"
Maaf jika kurang jelas, kode program ini adalah catatan pribadi penulis, penting untuk bisa diakses ketika dibutuhkan.
