有关VB的一些问题DimTodayasDate,OtherDayasDateToday=NowtxtDate.Text=DatetxtTime.Text=Hour(Now)&":"&Minute(Now)&":"&Second(Now)txtWeekday.Text=Weekday(Date)OtherDay=CDate(Year(Date)&"/10/1")txtDays.Text=OtherDay-Date+1请问OtherDay=CDate(

Question

有关VB的一些问题
Dim Today as Date ,OtherDay as Date
Today=Now
txtDate.Text=Date
txtTime.Text=Hour(Now)&":"&Minute(Now)&":"&Second(Now)
txtWeekday.Text=Weekday(Date)
OtherDay=CDate(Year(Date)&"/10/1")
txtDays.Text=OtherDay-Date+1
请问OtherDay=CDate(Year(Date)&"/10/1")是什么意思特别是CDate完全看不懂

Answer 1

date得到 包含年月日的日期
year得到 年月日日期中包含的年
年和 后面的拼成一个字符串
cdate 把这个字符串转换成 一个日期