以文本方式查看主题

-  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=149541)
--  作者：xnsiwei
--  发布时间：2020/5/5 21:13:00
--  关于列分解
如何用表达式实现下面的
图片点击可在新窗口打开查看此主题相关图片如下：bd803407-2d1e-498f-8047-c977d8ffdcfc.png
图片点击可在新窗口打开查看
列分解目的
         
  115.926544 24.098439               115.926544              24.098439
[此贴子已经被作者于2020/5/5 21:16:09编辑过]
--  作者：有点蓝
--  发布时间：2020/5/5 21:26:00
--  
表达式无法处理，使用代码

表格datacolchanged事件

If e.DataCol.name = "坐标" Then
    If e.DataRow.isnull("坐标") Then
        e.DataRow("经度")=Nothing
        e.DataRow("纬度")=Nothing
    Else
        Dim ar() As String = e.DataRow("坐标").split(" ")
        e.DataRow("经度")=ar(0)
        If ar.length > 1 Then
            e.DataRow("纬度")=ar(1)
        End If
    End If
End If
--  作者：xnsiwei
--  发布时间：2020/5/5 21:39:00
--  
代码如何填进去？
--  作者：有点蓝
--  发布时间：2020/5/5 21:47:00
--  
表格的datacolchanged事件：http://www.foxtable.com/webhelp/topics/1445.htm