以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  字符转换成日期  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=147198)

--  作者:zhuxinhui
--  发布时间:2020/3/11 19:29:00
--  字符转换成日期
想月份列变动或重置后,“开始日期”及“结束日期”列自动生成
Dim dr As DataRow = e.DataRow
Select Case e.DataCol.Name
    Case "月份","选择"
     Dim m As String= dr("月份").substring(0,3)
     Dim y As String = dr("月份").substring(4,2) 
     Dim dt1 As New Date(y, m, 1) \'获取该月的第一天     
     dr("开始日期") = dt1    
     Dim dt2 As New Date(y, m, Date.DaysInMonth(y,m)) \'获取该月的最后一天    
     dr("结束日期") =dt2
End Select

月份列的格式是6月数字符:202004
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20200311192457.jpg
图片点击可在新窗口打开查看
提示这个错误

--  作者:有点蓝
--  发布时间:2020/3/12 8:56:00
--  
"月份"列存储的是什么数据?截图看看
--  作者:zhuxinhui
--  发布时间:2020/3/12 10:06:00
--  
字符
--  作者:zhuxinhui
--  发布时间:2020/3/12 10:08:00
--  
开始日期与结束日期是日期时间
--  作者:有点蓝
--  发布时间:2020/3/12 10:19:00
--  
"月份"列存储的是什么数据?截图看看
--  作者:zhuxinhui
--  发布时间:2020/3/12 10:41:00
--  
是字符型
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20200312103951.jpg
图片点击可在新窗口打开查看

--  作者:zhuxinhui
--  发布时间:2020/3/12 10:42:00
--  
开始日期与结束日期是日期时间
图片点击可在新窗口打开查看此主题相关图片如下:9999.jpg
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2020/3/12 10:51:00
--  
"月份"列存储的是什么数据?是“2月”还是“2020年2月”还是“202002”............截图看看表格里存储的数据!!!
--  作者:zhuxinhui
--  发布时间:2020/3/12 11:05:00
--  
是202002
--  作者:zhuxinhui
--  发布时间:2020/3/12 11:09:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.rar