vb surfer8.0 数据插值问题，请各位高手指点

p_yf100

我用VB编程，预报数值均为0时，调用插值处理时会报错，说数据处于一个平面上。请各位高手指点，非常感谢！
Set SurferApp = CreateObject("Surfer.Application")
SurferApp.GridData DataFile:=App.Path + "\ybjg\" & HH & j & ".dat", xCol:=1, yCol:=2, zCol:=3, Algorithm:=2, DupMethod:=2, ShowReport:=False, OutGrid:=App.Path + "\data\station.grd", xMin:=113.899, xMax:=116.1466, yMin:=27.55, yMax:=29.106, NumCols:=368, NumRows:=256  '数据格点化处理368列，256行
SurferApp.GridBlank InGrid:=App.Path + "\data\station.grd", BlankFile:=App.Path + "\sysdat\yichunmap.bln", OutGrid:=App.Path + "\data\station.grd"
Set plot = SurferApp.Documents.Add(1)
Set ContourMapFrame = plot.Shapes.AddContourMap(App.Path + "\data\station.grd ")

kiwilee

试试Algorithm:=srfKriging, SearchEnable:=True

holz

楼主都知道“预报数值均为0”了，还做什么插值？

非要一个 grd 文件的话，自己写就行，但是依然不能画图，还是会提示“数据处于一个平面上”。

xyangtian

预报数值均为0时， xCol:=1, yCol:=2, zCol:=3数据为零吗

holz

楼上是来搞笑的，还是猴子派来的？

来这里的人都知道什么叫点、线、面吧？xyz 都为 0 是什么？

即使是行外，也能理解预报值就是 z 值吧？

p_yf100

kiwilee 发表于 2016-12-23 22:18
试试Algorithm:=srfKriging, SearchEnable:=True

谢谢，还是不行，我直接到SURFER软件里去操作都会报这个错。

p_yf100

holz 发表于 2016-12-26 09:14
楼主都知道“预报数值均为0”了，还做什么插值？

非要一个 grd 文件的话，自己写就行，但是依然不能画图 ...

谢谢，因为是利用预报方程批量计算的，晴好天气预报值均为0，就是想处理自动化，无雨时也生成一张空白图。

holz

p_yf100 发表于 2016-12-27 11:56
谢谢，因为是利用预报方程批量计算的，晴好天气预报值均为0，就是想处理自动化，无雨时也生成一张空白图 ...

空白图很简单，你只是要避免出错停止而已。

加判断吧，只要数据不可网格化或绘图，就直接出空白图。

言深深

所有数据都在一个平面上面，surfer是没有办法绘制等值线图的···报错
手动绘制也是没有···