Access資料防呆

設計了一個表單來維護TABLE資料,

但有部份資料需設定為必填欄位,

目前用以下程式做防呆的設定,

若有多個欄位,可否有更快的方式處理?

謝謝!

If IsNull([Project Date].Value) = False Then

MsgBox "此欄位不得為空值"

[Project Date].SetFocus

Exit Sub

End If

Update:

謝謝ETking及Chiabeibei

若需要防呆的欄位有十幾個,

希望能以程式的方式快速處理防呆的動作…

Comments

  • 重點欄位個個防呆也是方法之一種

    也可以考慮把防呆的動作,

    設定在「儲存」按鈕 On_Got Focus中,

    重點欄位一次防呆。

    較常用的是

    If IsNull(欄位1) Or IsNull(欄位2) Or IsNull(欄位3) ....Then

     If IsNull(欄位1) Then

      Me.欄位1,SetFocus

     ElseIf IsNull(欄位2) Then

      Me.欄位2,SetFocus

     ElseIf IsNull(欄位3) Then

    ...........

     End If

    End If

    參考

    2008-06-24 19:32:56 補充:

    設定「對方不接受網友來信」,無法進一步討論。

    2008-06-29 20:32:36 補充:

    這樣無法提供「快速」處理動作,可將檔案寄過來實作。

    或是詳述相關物件及用途。

  • 在資料表設計的時後就可以直接設定了

    點這裡看看

    如果在表單中為輸入資料則會出現下面的畫面

    點這裡看看

Sign In or Register to comment.