SQL語言編程

Dim fdObject作為MapXLib。查找特征

設置fdObject = Map1。層(“特征”)。找到。搜索(text1.text)。

If (FindCityObject。FindRC Mod 10 = 1)然後

MapX1。設置縮放比例(100)

MapX1。setcentex(FD object。GetCenterX())

MapX1。SetCenterY (fdObject。GetCenterY())

其他

MsgBox("未找到城市")

如果…就會結束

末端接頭