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

    1. <mark id="os3gq"></mark>
    2. Access培訓
      網站公告
      ·Access快速平臺QQ群號:84825014    ·Access快速開發平臺下載地址及教程    ·歡迎添加微信交流賬號:AccessoftChu    ·如何快速搜索本站文章|示例|資料    
      您的位置: 首頁 > 技術文章 > 綜合其它

      【譯文】當前值與前一條記錄的值的比較(相同字段)

      時 間:2012-04-13 07:43:45
      作 者:周芳   ID:24526  城市:上海
      摘 要:在更新后事件,比較字段的原值和字段的新值。
      正 文:

      原作者:未知  翻譯:周芳

      【譯文】在更新后事件,比較字段的原值和字段的新值。

              想知道為什么很難在用戶更新字段后找出字段的原值嗎?我認為更新前事件可以通過Me.[字段名]獲得原值。

              這里有一個簡單的方法來做到這一點:首先在窗體模塊中“Option Compare Database”的代碼后面定義一個全局變量。這個例子里,我們定義一個string類型的變量:hold_value.

      Option Compare Database
         Dim hold_value As String
          ...

              接下來我們在窗體中建立一個“成為當前”事件:

      Private Sub Form_Current()
          hold_value = Me.icount       ’icount是字段名
      End Sub

              你可能會發現你會得到一個空值的報錯,所以你可能想要使用下面的方法來繞開這個小問題:

      hold_value = Nz(Me.icount, "") ’把空值轉換成空字符串

              最后在更新事件后,原值和新值都可供我們使用。

      【原文】

      Compare original value of field to new value of field in the after update event.


      Ever wonder why it is so difficult to figure out what the original value of a form field was after the user updates the field? I thought that the Before Update event would help me do this but using the Me.Fieldname.Oldvalue doesn't give me the old value it gives the new value!

      Here is a simple way to do this:  First set up a global variable in this form just after the Option Compare Database.  In this example we dimension a string variable called hold_value.

      Option Compare Database
         Dim hold_value As String
          ...

      Next we create an On Current event for the form:

      Private Sub Form_Current()
          hold_value = Me.icount      

      End Sub

      You may find that you get a null value error so you might want to use the following assignment to get around this little problem:

      hold_value = Nz(Me.icount, "")


      Finally in the After Update event we have both the new and old values available for us to use.



      Access軟件網QQ交流群 (群號:143677707)       access源碼網店

      最新評論 查看更多評論(0)

      發表評論您的評論將提升作者分享的動力!快來評論一下吧!

      用戶名:
      密 碼:
      內 容:
       

      常見問答

      技術分類

      相關資源

      關于我們 | 服務條款 | 在線投稿 | 友情鏈接 | 網站統計 | 網站幫助