用 format吧,具体参数我不是记得很清楚,看看MSDN就知道答案了

解决方案 »

  1.   

    1. format(Now,"mmmm,dd,yyyy")
    2. format(Now,"hh:mm AM/PM")
      

  2.   

    返回一个日期或时间格式的表达式。语法FormatDateTime(Date[,NamedFormat])FormatDateTime函数语法有如下几部分:部分 描述 
    Date 必需的。要被格式化的日期表达式。 
    NamedFormat 可选的。数字值,表示日期/时间所使用的格式。如果忽略该值,则使用vbGeneralDate。 
    设置值NamedFormat参数的设置值如下:常数 值 描述 
    vbGeneralDate 0 显示日期和/或时间。如果有日期部分,则用短日期格式显示。如果有时间部分,则用长时间格式显示。如果都有,两部分都显示。 
    vbLongDate 1 用计算机区域设置值中指定的长日期格式显示日期。 
    vbShortDate 2 用计算机区域设置值中指定的短日期格式显示日期。 
    vbLongTime 3 用计算机区域设置值中指定的时间格式显示时间。 
    vbShortTime 4 用24小时格式(hh:mm)显示时间。 
      

  3.   

    Private Sub Command1_Click()
      MsgBox Format(Date, "mmmm dd yyyy")  MsgBox Format(Time, "hh:mm  AM/PM")End Sub