这种程序如何写?

来源：百度知道 编辑：UC知道 时间：2024/05/13 15:51:35
小弟只是vb新手,想写一个这样的程序,
我跟我女朋友是今年1月20号在一起的,算今天的话是第36天,
我想写一个这样的程序,打开程序会告诉你离2009年1月20号到打开程序的那一天一共过了几天

复制下面代码，然后编译成exe文件即可。

Private Sub Form_Load()
MsgBox "离2009年1月20号到现在已有" & (Date - #1/20/2009#) & "天。", vbInformation, "提示"
End
End Sub

Dim s As Date
s = "2009/01/20"
MsgBox (Date - s)