重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
1、时间可以直接比较大小,定义两个时间的变量,直接使用或者即可判断,跟数据大小判断是一样的
专注于为中小企业提供网站建设、成都网站设计服务,电脑端+手机端+微信端的三站合一,更高效的管理,为中小企业凌云免费做网站提供优质的服务。我们立足成都,凝聚了一批互联网行业人才,有力地推动了千余家企业的稳健成长,帮助中小企业通过网站建设实现规模扩充和转变。
2、时间差值,可以使用DateDiff函数进行
3、比如取一个现在的时间now,使用Year、month、day、hour、min、sec函数可以取到now的年份、月、日、小时、分钟和秒
Private Sub Command1_Click()
' Year (Date) ' 从日期中取年
' Month (Date) ' 从日期中取月
' Day (Date) ' 从日期中取日
' Weekday(Date, [FirstDayOfWeek As VbDayOfWeek = vbSunday]) ' 从日期中取星期' 默认值从星期日(vbSunday)开始' 举例如下:Dim myDate As String
myDate = Date ' 2010-4-12
Print Year(myDate) ' 2010
Print Month(myDate) ' 4
Print Day(myDate) ' 12
Print Weekday(Date) ' 2
Print Weekday(Date, vbMonday) ' 1
End Sub
嗯 刚好碰到你的问题 不过我找到了比楼上更好的办法 直接用Today.day就好了 我想可能是VB.NET直接把日期函数都整合了
在 VB.NET 中,如果使用 Day 函数,可能需要用 Microsoft.VisualBasic 命名空间限定该函数,因为 System.Windows.Forms 命名空间将 Day 定义为枚举。
MSDN 参考链接:
方法一:在 Class 上部加入
Imports Microsoft.VisualBasic
Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
MessageBox.Show(Day(Now).ToString)
End Sub
End Class
方法二:在调用 Day 函数的前面加入模块的完全限定名 DateAndTime
Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
MessageBox.Show(DateAndTime.Day(Now).ToString)
End Sub
End Class
用日期函数day()可获得当前日期,time()可获得当前系统时间.
dim CurDay as string
dim CurTime as string
curday=day()
curtime=time()
Label1.Caption = Date
就能在Label16显示当前日期
now 这个函数可以获得当前系统时间(包括年月日,小时分钟秒)
而
year()
month()
day()
等等则可以从now返回的值中分别提取年,月,日的信息
不是 有 函数嘛?
now() 就是 吧
取得 后 再 分离出你所需的,分别赋值 就行了,当然 还是 有 函数的