以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  从类型“DateTimePicker”到类型“Date”的转换无效  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=93273)

--  作者：zhangjian222200 --  发布时间：2016/11/24 13:33:00 --  从类型“DateTimePicker”到类型“Date”的转换无效 1.基本情况：     a.在datetimepicker出生年月控件，输入日期，text年龄控件，自动显示年龄 b.出生年月控件名：（datetpchusny），年龄控件名:(Textnianl) 2.错误提示 .NET Framework 版本：2.0.50727.3655 Foxtable 版本：2016.7.29.1 错误所在事件：窗口,男生资料主窗口,datetpchusny,TextChanged 详细错误信息： 从类型“DateTimePicker”到类型“Date”的转换无效。 3.代码   知道是下面红色转换错误，就是不知道怎么改 \'计算年龄 Dim jtrq As Date = Date.Today        \'定义:今天日期,取首字母作为变量名 Dim csrq As Date = e.Form.Controls("datetpchusny")        \'定义:出生日期,取首字母作为变量名 Dim xznf As Integer = jtrq.year      \'定义:现在年份,取首字母作为变量名 Dim csnf As Integer = csrq.year      \'定义:出生年份,取首字母作为变量名 Dim nl As Integer = xznf - csnf e.Form.Controls("Textnianl").WriteValue = nl 此主题相关图片如下：12345.png [此贴子已经被作者于2016/11/24 13:37:35编辑过]

--  作者：有点蓝 --  发布时间：2016/11/24 14:26:00 --   Dim csrq As Date = e.Form.Controls("datetpchusny").value