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

    1. <mark id="os3gq"></mark>
    2. 【access自定義函數】根據設置的公式計算得出結果\計算公式自定義-落塵_小新
      Access軟件網QQ交流學習群(群號碼198465573),歡迎您的加入!
      首頁 >技術文章> 源碼示例


      【access自定義函數】根據設置的公式計算得出結果\計算公式自定義

      發表時間:2012/3/21 15:11:09 評論(8) 瀏覽(16828)  評論 | 加入收藏 | 復制
         
      摘 要:【Access自定義函數】根據設置的公式計算得出結果
      正 文:

          由于示例發在了論壇,不便于網友們搜索到,為了方便網友們搜索到示例\文章,整理了一下,供下載參考:

      '模塊自定義函數 

      Public Function 公式計算(字段一, 字段二, 字段三, 公式)
          Dim stemp
          For N = 1 To Len(公式)
              If Mid(公式, N, 1) = "A" Then
                  stemp = stemp & 字段一
              ElseIf Mid(公式, N, 1) = "B" Then
                  stemp = stemp & 字段二
              ElseIf Mid(公式, N, 1) = "C" Then
                  stemp = stemp & 字段三
              Else
                  stemp = stemp & Mid(公式, N, 1)
              End If
          Next N
          公式計算 = Eval(stemp)
      End Function

       

      附   件:

      點擊這里下載 


      設計視圖:


      數據表視圖:


      Access軟件網交流QQ群(群號:198465573)
       
       相關文章
      【Eval函數】根據設置的公式計算得出結果\計算公式自定義  【縱云梯   2012/3/21】
      換一個思路來解決公式計算的問題\自定義計算公式的示例  【好大王國  2012/3/29】
      根據客戶級別分析產品單價\根據級別自動選取對應數據\根據項目不同調...  【落塵  2012/2/28】
       
       訪客評論
      2019/8/20qinghe
      如果是三個以上字段, 則改為“公式計算(字段一, 字段二, 字段三, ……,公式)” 只是其中某幾個字段參與計算? A+B+D A+C+D 系統就會報錯了。 不知大家有沒有更好的處理?

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

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

      落塵_小新

      文章分類

      文章存檔

      友情鏈接
       
         
      湖北11选5