主题：取值

我是小白，请高手帮忙。

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

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