计算日期

ptcool88899 · 发表于 2024-9-3 08:58

如1970年4月出生，至2025年4月满55周岁，TextBox2.Value=2025年4月，以下用VBa窗体上为什么不能用，总显示编译错误缺少：），请老师帮忙改一下
TextBox2.Value = Date(Year(TextBox3.Value) + 55, Month(TextBox3.Value), Day(TextBox3.Value)

quqiyuan · 发表于 2024-9-3 09:08

date??是不是要DateSerial 函数

lcluck2002 · 发表于 2024-9-3 09:11

单看你这一句，的确是少了最后一个括号啊。

3190496160 · 发表于 2024-9-3 09:12

看看vba中的DateAdd函数呗

ptcool88899 · 发表于 2024-9-3 10:10

3190496160 发表于 2024-9-3 09:12
看看vba中的DateAdd函数呗

运行显示无效过程或参数

MOY838840554 · 发表于 2024-9-3 10:18

TextBox2.Value是string,又不是date类型,为什么能直接获取,用文本转日期的函数先

gyf519 · 发表于 2024-9-3 16:50

这个思路是用DateSerial函数，要确保TextBox3的数据类型是日期
或者用DateAdd函数，例如dateadd("yyyy",70,#2024-09-03#)
返回2094/9/3

		自动登录	找回密码
密码			免费注册

[分享] 计算日期

评分