以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]日期格式转换 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=77874) |
-- 作者:vvfree -- 发布时间:2015/11/26 20:54:00 -- [求助]日期格式转换 yd = New Date(yy,mm,Date.DaysInMonth(yy,mm)) 无法转换 请问要用什么方式???? |
-- 作者:大红袍 -- 发布时间:2015/11/26 21:32:00 -- dim yy as integer = 1991 dim mm as integer = 12 Dim yc As String Dim yd As Date yd = New Date(yy,mm,Date.DaysInMonth(yy,mm)) yc = Format(yd,"yyyy-MM-dd") msgbox(yc) |