Dim BegDate, EndDate, Msg Dim y, m, d, num Dim i, j, cnt, start, over 'BegDate = InputBox("請輸入起始日期:", , Format(Date, "yyyy/mm/dd")) ...
確定! 回上一頁