以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  您好!请问这个报错是怎么回事?该怎么改?  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=142176)

--  作者:18811741402
--  发布时间:2019/10/20 14:57:00
--  您好!请问这个报错是怎么回事?该怎么改?

图片点击可在新窗口打开查看此主题相关图片如下:2.jpg
图片点击可在新窗口打开查看
代码如下:
static y As Integer = 1
Dim r As Col = Tables("table1").Cols(2)
Dim s As String = "-0.001415+0.002638*r+0.00003843*y-0.000496*r^2-0.00001426*r*y-0.000000276*r^2+0.000003953*r^2*y+0.00000003174*r*y^2+0.0000000006025*y^3"
Output.Show(Eval(s))
Tables("表A").Current("第二列") = s
图片点击可在新窗口打开查看此主题相关图片如下:1.jpg
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2019/10/20 23:03:00
--  
static y As Integer = 1
Dim r As Col = Tables("table1").Cols(2)
Dim s As Decimal  = -0.001415+0.002638*r+0.00003843*y-0.000496*r^2-0.00001426*r*y-0.000000276*r^2+0.000003953*r^2*y+0.00000003174*r*y^2+0.0000000006025*y^3
Output.Show(s)
Tables("表A").Current("第二列") = s

--  作者:18811741402
--  发布时间:2019/10/21 11:43:00
--  
您好!我按这个改了后又报错了
图片点击可在新窗口打开查看此主题相关图片如下:1.jpg
图片点击可在新窗口打开查看应该是这个错了:
Dim r As Col = Tables("table1").Cols(2),请问该如何改?我将其改为:Dim r As Decimal = "[直径]"但最后还是报错。
图片点击可在新窗口打开查看此主题相关图片如下:2.jpg
图片点击可在新窗口打开查看

--  作者:18811741402
--  发布时间:2019/10/21 11:45:00
--  
图2报错是因为将Dim r As Col = Tables("table1").Cols(2)改为Dim r As Decimal = "[直径]"
--  作者:有点蓝
--  发布时间:2019/10/21 12:06:00
--  
Dim r As Decimal = Tables("table1").current("直径")