- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 数据表问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=42444)
-- 发布时间：2013/11/12 10:48:00
-- 数据表问题
请教老师，我要建一个容积对照表的数据表，如图所示，可这种表的字段是数字，怎么解决这个问题
-- 发布时间：2013/11/12 10:48:00
--
图呢?
此主题相关图片如下：上传图片请参考这里.gif
-- 发布时间：2013/11/12 15:36:00
--
此主题相关图片如下：rjb.png
-- 发布时间：2013/11/12 15:38:00
--
没明白你的需求,你想实现的是什么?
-- 发布时间：2013/11/12 15:43:00
--
不知道第一次为啥没附上去
-- 发布时间：2013/11/12 15:46:00
--
现在主要是
没明白你的需求,你想实现的是什么? |
-- 发布时间：2013/11/12 18:07:00
--
写了个字段名作为变量的表达式，有问题
If e.DataCol.Name="液位" Then
For Each dc As DataCol In DataTables("容积表").DataCols
If dc.Caption=e.DataRow("小数") Then
Dim c As String= dc.Name
Dim dr As DataRow =DataTables("容积表").Find("液位高度=\'" & e.DataRow("整数") & "\' And c =\'" & e.DataRow("小数") & "\'")
If dr IsNot Nothing Then
e.DataRow("容积")=dr(dc.Name)
End If
End If
Next
End If
运行后提示：调用的目标发生了异常。
语法错误:“c”运算符后缺少操作数。
到底怎么写呀
-- 发布时间：2013/11/12 19:57:00
--
c 是一个列的名字吗？代码要改一下，列名要正确
Dim dr As DataRow =DataTables("容积表").Find("液位高度=\'" & e.DataRow("整数") & "\' And c =\'" & e.DataRow("小数") & "\'")
-- 发布时间：2013/11/12 20:18:00
--
C是个列名变量， Dim c As String= dc.Name
-- 发布时间：2013/11/12 20:57:00
--
哦，那改成这样就行了
Dim dr As DataRow =DataTables("容积表").Find("液位高度=\'" & e.DataRow("整数") & "\' And " & c & "=\'" & e.DataRow("小数") & "\'")