vb考试救急!!编写代码:输入一个日期(例如2015年3月21日),计算这一 50
vb考试救急!!编写代码:输入一个日期(例如2015年3月21日),计算这一天是这一年之中的第几天,将判断结果显示出来...
vb考试救急!!编写代码:输入一个日期(例如2015年3月21日),计算这一天是这一年之中的第几天,将判断结果显示出来
展开
展开全部
Private Sub Command1_Click()
Dim d As Date
d = InputBox("", , #3/21/2015#)
MsgBox DateDiff("d", Year(d) & "-1-1", d) + 1
End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询