首页
后端开发
VB
格式输出函数在VB6.0中的应用

格式输出函数在VB6.0中的应用

18 次浏览 0 条评论
ppt
ppt
  1. 格式输出函数例 3.1 使用 Format 函数显示日期和时间。
Private Sub Form_Click()
    Dim MyTime As Date
    Dim MyDate As Date
    MyTime = #9:21:30 PM#
    MyDate = #7/21/97#

    ' 格式化日期
    Print Format(MyDate, "m/d/yy")
    Print Format(MyDate, "mmmm-yy")

    ' 格式化时间
    Print Format(MyTime, "h-m-s AM/PM")
    Print Format(MyTime, "hh:mm:ss A/P")

    ' 显示系统当前日期和时间
    Print Format(Now, "yyyy年m月dd日hh:mm")

    ' 以系统预定义的格式显示当前时间
    Print Format(Date, "dddd, mmmm dd, yyyy")
End Sub
ppt 文件大小：3.29MB