- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]如何将字符转换为日期 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=13129)
-- 发布时间：2011/9/29 9:38:00
-- [求助]如何将字符转换为日期
加载SQL数据源的日期列为8位的字符串，要求将其转换为date格式，如何实现，请各位老师指教，谢谢！！
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目176.table |
[此贴子已经被作者于2011-9-29 9:46:19编辑过]
-- 发布时间：2011/9/29 9:52:00
--
Dim s As String = "20111231"
Dim d As Date = new Date(s.Substring(0,4),s.Substring(4,2),s.Substring(6,2))
output.show(d)
-- 发布时间：2011/9/29 10:13:00
--
谢谢狐爸老师的指教，列转换代码如下：
Select Case e.DataCol.Name
Case "字符串"
Dim dr As DataRow = e.DataRow
If dr.IsNull("字符串") Then
dr("日期") = Nothing
Else
dr("日期") =new Date(dr("字符串").Substring(0,4),dr("字符串").Substring(4,2),dr("字符串").Substring(6,2))
End If
End Select
再次感谢狐爸老师！！