B、使用LayerInfo对象创建临时表，可以指定字段。示例：
Dim Lyr As MapXLib.Layer
Dim LayerInfo As New MapXLib.LayerInfo
Dim Flds As New MapXLib.Fields
‘字段定义
Flds.AddStringField "ID", 12
Flds.AddStringField "Name", 50
Flds.AddNumericField "Deptch", 12, 2
Flds.AddIntegerField "Length"
′
LayerInfo.Type = miLayerInfoTypeTemp
LayerInfo.AddParameter "FileSpec", FileName
LayerInfo.AddParameter "NAME", LayerName
LayerInfo.AddParameter "Fields", Flds
Set Lyr = MainMap.Layers.Add(LayerInfo, 1)
Set Lyr = Nothing
Set LayerInfo = Nothing
（2） 创建永久表
Dim Lyr As MapXLib.Layer
Dim LayerInfo As New MapXLib.LayerInfo
Dim Flds As New MapXLib.Fields
Flds.AddStringField "ID", 12
Flds.AddStringField "Name", 50
Flds.AddNumericField "Deptch", 12, 2
Flds.AddIntegerField "Length"
′
LayerInfo.Type = miLayerInfoTypeNewTable
LayerInfo.AddParameter "FileSpec", FilePath + "" + FileName
LayerInfo.AddParameter "NAME", LayerName
LayerInfo.AddParameter "Fields", Flds
Set Lyr = MainMap.Layers.Add(LayerInfo, 1)
Set Lyr = Nothing
Set LayerInfo = Nothing
5、 创建工具句柄
系统已经定义工具句柄都以整数（包括16进制）常数存在，句柄号大于1000和小于12基本都为系统使用。
A. 定义常数：必须为全局变量
Global Const CreateSymbolTool = 13 ′创建节点
Global Const CreateLineTool = 15 ′创建管线
Global Const InfoTipTool = 16 ′信息工具
Global Const MoveFeature = 17 ′移动地图
Global Const ScaLEDistanceTool = 18 ′测量两点间的距离
B. 使用CreateCustomTool创建新的工具句柄：
MainMap.CreateCustomTool CreateSymbolTool, miToolTypePoint, miSymbolCursor
MainMap.CreateCustomTool CreateLineTool, miToolTypeLine, miCrossCursor
MainMap.CreateCustomTool InfoTipTool, miToolTypePoint, miCrossCursor
MainMap.CreateCustomTool MoveFeature, miToolTypeLine, miPanCursor
MainMap.CreateCustomTool Sca
