以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [分享][求助]苹果系统日期时间兼容处理,请问老师如何按特定格式生成  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=148140)

--  作者:huangfanzi
--  发布时间:2020/3/31 21:13:00
--  [分享][求助]苹果系统日期时间兼容处理,请问老师如何按特定格式生成
我前面一个帖子是关于苹果系统对日期时间不兼容的问题,现在找到了个解决办法,就是按下面的格式强行指定一个值,我试了下,是可以的
.AddInput("开盘时间","开盘时间","datetime-local").Value = "2017-06-01T08:30"

现在希望返回当前日期时间,也就是说如何让时间格式变成:"2017-06-01T08:30"
我写了以下代码,
Dim t As Date =Date.Now
Dim yyyy As String = t.Year
Dim mm As String = t.Month
Dim dd As String = t.Day
Dim hh As String = t.Hour
Dim fz As String = t.Minute
Dim rq As String = yyyy + "-" + mm + "-" + dd + "T" + hh + ":" + fz
可返回的值的格式是:"2017-6-1T8:30",请问老师如何改代码,谢谢!

--  作者:有点蓝
--  发布时间:2020/3/31 21:17:00
--  
.AddInput("开盘时间","开盘时间","datetime-local").Value = format(date.now,"yyyy-MM-ddTHH:mm")
--  作者:huangfanzi
--  发布时间:2020/3/31 21:28:00
--  
老师,能告诉我为什么,非要这种奇怪的日期格式
--  作者:有点蓝
--  发布时间:2020/3/31 21:37:00
--  
这个要去问苹果,被咬了一口那个。