参考代码
Dim dt As DataTable = DataTables("表A")
Dim fdr As DataRow = dt.Find("", "时间 desc")
If fdr Isnot Nothing Then
msgbox(fdr("消息"))
End If
加好友 
发短信
Post By：2018/1/21 21:44:00 [显示全部帖子]
