Form VBA w/A2013

[Dick7Access]

Here are the two forms!

 

[vbaInet]

I can't see any of the code suggested in the db. Can you upload something with your trials that isn't working.

By the way, how do you manage to read those command buttons with the pale yellow fore colour?

 

[Dick7Access]

I can't see any of the code suggested in the db. Can you upload something with your trials that isn't working.

By the way, how do you manage to read those command buttons with the pale yellow fore colour?

Actually they are dark green. They came out that way when I zipped them.
I not sure what you are asking me to send.

 

[vbaInet]

Strange!

Don't worry, I found the bit of code you said wasn't working.
I just tested it and in fact it is changing the caption to "Supporting Churches".

 

[Dick7Access]

Thanks for your help
It is working!
I hate it when I do dumb things. On the other copy I had switch the embedded text from supporting churches to generic. when I made a copy from an earlier version I forget to switch it back, so supporting churches was already the text.

If you still have that menu form it has a cmd for states. Is it possible to pick up the 2 letter abbreviation of whatever state (FL, MS etcs.) I query in the dialog box and put it in the label?

Ps. if you ever come to FL (when I am home, I am in MS right now) I will treat you to the best Chines Buffet in the whole US and TX.

 

[vbaInet]

Yeah, I noticed that you had saved "Supporting churches" as the default caption and guessed that may have been the confusion.

If you still have that menu form it has a cmd for states. Is it possible to pick up the 2 letter abbreviation of whatever state (FL, MS etcs.) I query in the dialog box and put it in the label?

You mean the dialog box is a parameter in your query?

Ps. if you ever come to FL (when I am home, I am in MS right now) I will treat you to the best Chines Buffet in the whole US and TX.

That's kind of you. I was in the LA and Vegas last year... might be going to NY later this year.
Can the Chinese buffet be as good as what we get here in the London?

 

[Dick7Access]

Yeah, I noticed that you had saved "Supporting

Don't know as I have never eaten @ a Chinese Buffet in London, but I have eaten in Chinese Buffets in 33 states in US. In fact I can't even remember much of what I ate in UK. Of course I was only 19, so all I remember that a young woman took me drinking and she ordered us a pims #1 or 2. Or something like that.

You mean the dialog box is a parameter in your query?

Yes, sometimes I look for churches by state. In fact I just had to send a associate a list of all the churches I had for AZ. So is it possible to have my label show what state I enter in?


BTY:
I have ask this before, but nobody seems to know what happened to John Big booty. He invites me to Aussie country.

 

[Dick7Access]

See attachment

 

[vbaInet]

Don't know as I have never eaten @ a Chinese Buffet in London, but I have eaten in Chinese Buffets in 33 states in US. In fact I can't even remember much of what I ate in UK. Of course I was only 19, so all I remember that a young woman took me drinking and she ordered us a pims #1 or 2. Or something like that.

I'm sure that you've had your fair share of partying when you were in your teens But it sounds like you may have found a goldmine.

Yes, sometimes I look for churches by state. In fact I just had to send a associate a list of all the churches I had for AZ. So is it possible to have my label show what state I enter in?

I would normally say that you should create a form for this but I'll keep it simple for you.

1. Paste this code in a module:
   

   Private strParamVal As Variant
   
   Public Function SetStateParam(TheValue As Variant) As Variant
       strParamVal = TheValue
   End Function
   
   Public Function GetStateParam() As Variant
       GetParam = strParamVal
   End Function

2. In a column in your query, enter this:
   

   SetStateParam([COLOR="blue"][Enter State][/COLOR])

   ... it needs to be the same text as the parameter.
3. To get the value use the GetStateParam() function:
   

   Forms("frmChurchesAllDick").Controls("[COLOR="Blue"]LabelName[/COLOR]").Caption = GetStateParam()

BTY:
I have ask this before, but nobody seems to know what happened to John Big booty. He invites me to Aussie country.

No idea where he is either. jdraw also mentioned the same thing.

 

[Dick7Access]

I'm sure that you've had your fair share of partying when you were in your teens But it sounds like you may have found a goldmine.

I would normally say that you should create a form for this but I'll keep it simple for you.

1. Paste this code in a module:
   

   Private strParamVal As Variant
   
   Public Function SetStateParam(TheValue As Variant) As Variant
       strParamVal = TheValue
   End Function
   
   Public Function GetStateParam() As Variant
       GetParam = strParamVal
   End Function

2. In a column in your query, enter this:
   

   SetStateParam([COLOR=blue][Enter State][/COLOR])

   ... it needs to be the same text as the parameter.
3. To get the value use the GetStateParam() function:
   

   Forms("frmChurchesAllDick").Controls("[COLOR=Blue]LabelName[/COLOR]").Caption = GetStateParam()

No idea where he is either. jdraw also mentioned the same thing.

Thanks. Two reasons I am revamping. No. 1 To learn to code better. No. 2 This coding I am eliminating lots of forms and lots of macros.I just checked the original db. It has 42 form.

 

[vbaInet]

I see. A form would offer you more flexibility but you can look into this at your convenience.

 

[Dick7Access]

I see. A form would offer you more flexibility but you can look into this at your convenience.

BTW: Did you like my green buttons. My wife doesn't. Once I finish revamping my end I will duplicate the same thing, except with her colors and her placement of text, and cmd's. Got to keep mamma happy. I made her a db that she has 40,000 recipes in . I keep telling her garbage in garbage out. Now she's not happy she can't sort on a memo file.

 

[vbaInet]

Yes I remember your recipes db.

The attached is what I see at the moment. Honestly, it's erm ok but I'm with your wife on this one... it's not the best looking menu, and your buttons are all over the place.

 

[vbaInet]

After a quick re-jig, attached is a bit of inspiration for you.

 

[Dick7Access]

After a quick re-jig, attached is a bit of inspiration for you.

Might be pretty good once I spruce it up a bit with so bright colors

 

[vbaInet]

You know what the wife would say about that!

 

[Dick7Access]

Here is one that my wife said I had to get rid of, that is was grounds for divorce.
Now I know it's not very professional looking, and I don't sent any db's out like that, but those are for my private collection.

 

[vbaInet]

My oh my Dick S!

 

[Dick7Access]

Here is one that my wife said I had to get rid of, that is was grounds for divorce.
Now I know it's not very professional looking, and I don't sent any db's out like that, but those are for my private collection.

BTW: that was before Access let me pick colors for cmd's. I downloaded a little apps that let me make covers for the cmd's

 

[vbaInet]

It looks like a Princess' menu board.