想实现：【改约时间】字段的内容为【改约情况】字段中最后一个“；”分隔符后面的内容；命令该怎么写？

比如：

1、【改约情况】内容为：2018-04-05 00:00:00      那么【改约时间】的内容自动生成为：2018-04-05 00:00:00

2、【改约情况】内容为：2018-04-05 00:00:00；2018-04-05 08:33:00      那么【改约时间】的内容自动生成为：2018-04-05 08:33:00

3、【改约情况】内容为：2018-04-05 00:00:00；2018-04-05 08:33:00；2018-04-05 12:00:03    那么【改约时间】的内容自动生成为：2018-04-05 12:00:03

Dim str As String = e.datarow("改约情况")

Dim ary = str.split(";”）

e.datarow("改约情况") = ary(ary.length-1) 

字段中是带有“；”号并且有 回车 的。命令该怎么写？

在DataColChanged中写了以下命令；会自动填入第一个时间而不是最后一个时间

Select Case e.DataCol.name
    Case "预约上门时间"
        If e.DataRow.isnull("预约上门时间")   Then
        Else
            Dim str As String = e.DataRow("预约上门时间")
            Dim ary = str.split(";vbcrlf")
            e.DataRow("预约上门时间") = ary(ary.length-1)
        End If
End Select

 想实现填入内容为： 2018-06-30 18:20:00

此主题相关图片如下：360截图20180630210703632.jpg

2楼代码不变，报错还是怎样？

做个例子发上来测试。