主题：[求助]求表达POSITION代码?

Dim drnew As Row = Tables("通讯记录").AddNew()

drnew("接收时间") = now

drnew("接收内容") = e.Message

Dim msg As String = e.Message

Dim ret As String = "!false"

If e.Message.StartsWith("%") AndAlso e.Message.EndsWith("%")  '假定收到的信息头尾都是"%"

    msg  = msg.Trim("%")

    Dim prefix As String = msg.SubString(0,1)

    Select Case prefix

        Case "G" '查询

            msg = msg.TrimStart("G","|")

            Dim dr As DataRow = DataTables("订单").Find("订单编号 = '" & msg & "'")

            If dr IsNot Nothing Then

                ret = "%" & dr("客户名称") & "|" & dr("订单日期") & "|"  & dr("发货日期")'拼接主表字段内容

这以上这个代码，其中Dim dr As DataRow = DataTables("订单").Find("订单编号 = '" & msg & "'")这一句，是说等于订单表的订单编号而订单编号来源于收到的消息

我想在想改等于订单表的最后一行，或者等于订单表鼠标指向的一行