how to require all fields be input before pressing submit button?

[accessmatt]

Hello,

Is there a way to require all fields which I've put on a form be required before the user is able to submit (using the enter record button I created)?

Thanks,

[ranman256]

If IsValidForm() then 'do stuff

public Function IsValidForm() as boolean
dim vMsg
  select case true
       case txtName = "" 
          vMsg = "Client Name is missing"
       case isnull(cboState )
          vMsg = "State is missing"
   cboState.setfocus
  end select
  if vMsg <>"" then msgbox vmsg,vbCritical,"Required"
  IsValidForm =vMsg =""
end sub

[June7]

Or maybe set the fields as required in the table and let Access nag users.

[accessmatt]

Thanks June7, that' s a simple solution. I'll try playing around the the VBA script as well, thanks for that ranman.

[accessmatt]

June7, do you know if there's a way to change the error text when I use set required. Meaning it says I must enter a value in MYTABLE.MYFIELD field. Is there a way I can make that user friendly like you must enter a value in the XYZ field?

Thanks,