<output id="os3gq"><ruby id="os3gq"></ruby></output>

    1. <mark id="os3gq"></mark>
    2. 取得一個季度的第一天或最后一天-Victor Duane
      Access軟件網QQ交流學習群(群號碼198465573),歡迎您的加入!
      首頁 >技術文章> Access數據庫-模塊/函數/VBA


      取得一個季度的第一天或最后一天

      發表時間:2011/10/27 12:09:09 評論(2) 瀏覽(6516)  評論 | 加入收藏 | 復制
         
      摘 要:取得一個季度的第一天或最后一天
      正 文:

      當需要求當季的一個數量時,這兩個函數會用得上

      以下函數求得當季的第一天與最后一天

       

      Function FirstDayInQuarter(Optional dtmDate As Date = 0) As Date
          If dtmDate = 0 Then
              dtmDate = Date
          End If
          FirstDayInQuarter = DateSerial(Year(dtmDate), Int((Month(dtmDate) - 1) / 3) * 3 + 1, 1)
      End Function
      Function LastDayInQuarter(Optional dtmDate As Date = 0) As Date
          If dtmDate = 0 Then
              dtmDate = Date
          End If
          LastDayInQuarter = DateSerial(Year(dtmDate), Int((Month(dtmDate) - 1) / 3) * 3 + 4, 0)
      End Function

      附件:

      點擊下載此附件


      Access軟件網交流QQ群(群號:198465573)
       
       相關文章
      顯示當前季度示例  【麥田  2010/2/24】
      [access查詢]以年、周、季度做查詢  【蔣元根  2011/2/25】
      【access入門】獲取3個月前(一個季度前),3個月后(一個季度...  【麥田  2011/11/7】
      【Access掃盲知識】日期時間相減得出季度差的示例,DateDi...  【麥田  2013/2/16】
      【Access掃盲知識】日期時間相減得出年數,月數,季度,天數差的...  【麥田  2013/2/19】
       
       訪客評論
      2011/10/27小童
      贊個·····

      2011/10/27麥田
      管用

      總記錄:2篇  頁次:1/1 9 1 :
       
       發表評論
      評論內容 (必填)

      常見問答
      技術分類
      相關資源
      文章搜索
      關于作者

      Victor Duane

      文章分類

      文章存檔

      友情鏈接
       
         
      湖北11选5