以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]列值的转换  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=160384)

--  作者:chnfo
--  发布时间:2021/1/31 17:28:00
--  [求助]列值的转换
表中有三个表达式列(都没有设公式),XA(字符),XA1(双精度小数),XA2(双精度小数)
在datacolchanged事件中这么写的

Select Case e.DataCol.Name
    Case "XA"
        Dim x As String = e.newvalue
        If x.Contains("/") Then
            e.DataRow("XA1") = val(x.Split("/")(0))
            e.DataRow("XA2") = val(x.Split("/")(1))
        Else
            e.DataRow("XA1") = val(x)
            e.DataRow("XA1") = 0  ‘-----看错了,这里应当是XA2’ 
        End If
End Select

如果在XA中输入“100/20”,则XA1、XA2分别会显示100和20
但如果在XA中输入“123“,结果XA1和XA2都显示为0----它们不是应当显示为123和0的吗?

看错了.没问题 
[此贴子已经被作者于2021/1/31 17:45:41编辑过]