| 以下是代码片段： <％ '============================================================= '格式化时间（显示） '参数：n_flag '1： "yyyy-mm-dd hh：mm：ss" '2： "yyyy-mm-dd" '3： "HH：mm：ss" '4： "yyyy年mm dd日" '============================================================= function format_time（s_time、n_flag） dim y、m、d、h、mi、s format_time = "" isdate（s_time）= falseの場合、機能を終了します y = cstr（year（s_time）） M = CSTR（月（S_TIME）） len（m）= 1の場合、m = "0"＆m d = cstr（day（s_time）） len（d）= 1の場合、d = "0"＆d h = cstr（hour（s_time）） len（h）= 1の場合、h = "0"＆h mi = cstr（minute（s_time）） len（mi）= 1の場合、mi = "0"＆mi s = cstr（second（s_time）） len（s）= 1の場合、s = "0"＆s ケースn_flagを選択します ケース1 'yyyy-mm-dd hh：mm：ss format_time = y＆ " - "＆m＆ " - "＆d＆ "＆"： "＆mi＆"： "＆s ケース2 'yyyy-mm-dd format_time = y＆ " - "＆m＆ " - "＆d ケース3 'HH：mm：ss format_time = h＆ "："＆mi＆ "："＆s ケース4 'yyyy年mm format_time = y＆ "年"＆m＆ "月"＆d＆ "日" [選択]を終了します エンド関数 ％> |