以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  取值  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=83613)
--  作者：icemanwu
--  发布时间：2016/4/13 10:44:00
--  取值

我是小白，请高手帮忙。

这段语句中“送货年”我只想取后两位，该如何写。



Select Case e.DataCol.name

     Case "送货"

      Dim e.DataRow("入库单时间") As Date = Date.Today

           e.DataRow("送货年") = e.DataRow("送货单时间").year

           e.DataRow("送货月") = e.DataRow("送货单时间").month

           e.DataRow("送货日") = e.DataRow("送货单时间").Date

End Select
--  作者：Hyphen
--  发布时间：2016/4/13 11:30:00
--  

Select Case e.DataCol.name

     Case "送货"

      e.DataRow("入库单时间") = Date.Today

           e.DataRow("送货年") = e.DataRow("送货单时间").year.ToString().SubString(2,2)

           e.DataRow("送货月") = e.DataRow("送货单时间").month

           e.DataRow("送货日") = e.DataRow("送货单时间").Date

End Select