以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]日期格式转换  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=77874)

--  作者:vvfree
--  发布时间:2015/11/26 20:54:00
--  [求助]日期格式转换

yd = New Date(yy,mm,Date.DaysInMonth(yy,mm))
yc = Format(yd,"yyyy-MM-dd")

无法转换 请问要用什么方式????


--  作者:大红袍
--  发布时间: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)