请问为什么Exporter会将数据字段硬截成保留两位,并且还不是四舍五入? 如下面的15168.40 原来是 15168.40654,能设置保留位数吗? 或者四舍五入
导出后的数据:
"ID","句柄","所在区域","权属编码","权属","地类编码","地类","面积","所有权"
28672,,"淹没区","ax","凹下","D013","旱地",15168.40,"集体"
28673,,"淹没区","ax","凹下","D111","河流水面",1238.66,"集体"
代码:
Dim ex As New Exporter
Dim dlg As New FolderBrowserDialog
ex.SourceTableName = "窗口数据导出_Table1" '指定导出表
ex.FilePath = dlg.SelectedPath ' "c:\" '指定目标文件路径
ex.Format = "Delimited" '导出格式为符号分割的文本文件
ex.NewTableName = "地块信息" & FangAn & "" '指定文件名,注意无须扩展名
ex.Export() '开始导出
msgbox("已经导出到" & dlg.SelectedPath & "\地块信息" & FangAn & ".txt 文件.")
Dim Proc As New Process
Proc.File = dlg.SelectedPath & "\地块信息" & FangAn & ".txt"
Proc.Start