如何实现输入年龄计算出,出生年月日

Question

如题,我想实现的是,在一个文本框中输入年龄,比如34,在另一个文本框同时显示出年月日,比如(1975-01-01),这样要怎么来计算
  怎么来写呀?

Answer 1

默认一月一号,没看到啊?用DateAdd函数

Answer 2

        If IsNumeric(TextBox1.Text) Then
            TextBox2.Text = Format(Today.Date.AddYears(-1 * TextBox2.Text), "yyyy-MM-dd")
        End If记得给分啦，我穷啊

Answer 3

Format(CLng(Now) - (34 * 365), "yyyy-01-01")