Using If, Then, Else to generate message

[MCRK6275]

I'm trying to force users to key information in a field based on a Yes or No field. The yes or no field is "Foreign Address" and if they answer yes they must type the name of the country in the "Country Name" field. The message can simply state "Please type country". Please help..

 

[phishfn]

I'm pretty new to this myself but I'll give it a shot. Also there's not much information to go by, like how/when you want this prompt to activate, from where, whether option buttons are used, or a checkbox, etc. But wherever you launch it from the code should be something like this:

If [yourcontrol]=yes Then
Msgbox "Please Type Country",vbInformation,"Foreign Country"
'code to add the record here
End If

 

[MCRK6275]

I'm basically trying to ensure that if a foreign address feild, which is a Yes/No nox, is selected, that the program checks the "Country Name" field to make sure it's filled in. I want the prompt to activate after the "Country Name" is updated. It's coming from a form...Thanks for your help..

 

[docmeizie]

Another way is to put this code in the After Update event for the yes/no field:

Dim Country

If Me![ForeignAddress] = yes Then
Country = InputBox("Please Enter Country", "Foreign Country&quot
Me![CountryName] = Country
End I


If I take a peek in your Windows, to fix a problem, does that make me a "Peeping Tom"? Hmmmmmmmmmm

 

[MCRK6275]

Thanks for the help!