Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共3 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:[求助]如何将字符转换为日期

1楼
yyzlxc 发表于:2011/9/29 9:38:00

加载SQL数据源的日期列为8位的字符串,要求将其转换为date格式,如何实现,请各位老师指教,谢谢!!

 

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目176.table

[此贴子已经被作者于2011-9-29 9:46:19编辑过]
2楼
狐狸爸爸 发表于: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)

3楼
yyzlxc 发表于: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

再次感谢狐爸老师!!

共3 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .03125 s, 3 queries.