求教VB高手关于datediff的问题
PrivateSubTimer1_Timer()DimyAsDatey=Now()Text1.Text=Year(y)Text2.Text=Month(y)Text3.T...
Private Sub Timer1_Timer()
Dim y As Date
y = Now()
Text1.Text = Year(y)
Text2.Text = Month(y)
Text3.Text = Day(y)
Text4.Text = Weekday(y, 2)
Text5.Text = Format(Now, "hh:nn:ss")
Text6.Text = DateDiff("d", y, #10/1/year(y)#)
End Sub
显示缺少表达式，年份不可以用变量么？
那该怎么改啊 展开
Dim y As Date
y = Now()
Text1.Text = Year(y)
Text2.Text = Month(y)
Text3.Text = Day(y)
Text4.Text = Weekday(y, 2)
Text5.Text = Format(Now, "hh:nn:ss")
Text6.Text = DateDiff("d", y, #10/1/year(y)#)
End Sub
显示缺少表达式，年份不可以用变量么？
那该怎么改啊 展开
1个回答
展开全部
不追问反补充，算我没说
追问
额。。。点错了，我错了
追答
DateDiff("d", y, CDate("10/1/" & year(y)))
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
启帆信息
2024-11-19 广告
启帆信息是英伟达中国区代理商,原厂授权代理，提供全面的软件技术解决方案以及NVIDIA以太网产品、交换机等产品,欢迎前来咨询!...
点击进入详情页
本回答由启帆信息提供
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
