以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  获取2位月有简便写法吗  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=187831)
--  作者：puma
--  发布时间：2023/8/15 13:27:00
--  获取2位月有简便写法吗
        Dim m As String = Date.Today.Month
        If m < 10 Then
            m = "0" & m
        End If 
--  作者：有点蓝
--  发布时间：2023/8/15 13:41:00
--  
Dim m As String = format(Date.Today,"MM")