msgbox date
msgbox time
看看就知道了

解决方案 »

  1.   

    msgbox now
    msgbox date
    msgbox time
      

  2.   

    time函数
    dim mytime as date
    读取时间:
    mytime=time
    设置时间
    time=mytime另date函数用法一样。返回系统日期
    now函数返回当前的日期和时间,但只读。
      

  3.   

    不需要什么函数,定义一个日期型变量,将时间值赋给它就可以了。
    dim MyDate as date
    MyDate =now
    如果要求显示的格式,可以用format(MaDate,"yyyy-mm-dd")……来规定显示格式。
      

  4.   

    如果你获取的是当前的时间,可加上
    format(now,"hh:mm:ss",AM/PM)
    其中,AM/PM是可选的.
      

  5.   

    另外还有DateTime函数,它是VB本来就有的,可以用它直接获取.
      

  6.   

    now 
    time
    date
    如果想单独得到年,月...的话可以用year(date),month(date).....
      

  7.   

    dim MyTime,MyDate,MyYear,mymonth
    MyTime=Time()  '返回系统当前时间
    MyDate=Date()  '返回系统当前日期
    MyYear=year()  '返回系统当前年  
    mymonth=month() '返回系统当前月份
      

  8.   

    VB中有许多这样的函数
    1、Date与Date$
    功能:Date函数以日期数据类型的格式返回当前的系统日期,Date$则以字符串类型的格式返回当前的系统日期。
    语法:Date
         Date$
    Date$可能返回值有:Month(mm)        介于01到12(包括这两个数)之间的整数
                     Day(dd)          介于01到31(包括这两个数)之间的整数
                     Year(yyyy)       介于0100到9999(包括这两个数)之间的整数
    2、Now
    功能:以日期型数据的格式提供计算机系统时钟/日历的当前日期与时间。
    通用语法:Now
    如:
    private sub timer1_time()
    text2.text=format$(now,"mm-dd-yyyy hh:mm:ss",AM/Pm)
    end sub
    注:上面的代码将获得如12-31-2001 10:15:55 AM这样的结果。如果要它和手表一样不停,则timer.interval必须设为大于0的数。
    3、time与time$
    time以日期型数据返回当前的系统时间。time$则以字符串的形式返回计算机的当前的时间。
    语法:
    time
    time$
      

  9.   

    now现在时刻
    time时间
    date日期