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编辑过]