思路有了,下面看我們的代碼所示。 Sub MySerial(). Dim MyDateStr As Byte. MyDateStr = Day(DateSerial(Year(Date), Month(Date) + 1, 0)).
確定! 回上一頁