command button with picture (1 Viewer)

[Siegfried]

Dear experts,

I have placed on my main menu form command buttons with an picture to access forms/reports.
The picture in the button is gray by default, I created the same button with a orange button and set it hidden
Underneath the command button I put a textbox with label.
The label gives the command button its name and the textbox returns a DCOUNT value when true. If value false then the textbox is not visible.
When the textbox has a true value, then the command button with the orange label becomes visible and the gray one is hidden.
I have attached a picture for visual reference.

When I open the form though there's a runtime delay on the command button of a few seconds before it shows.


Could I overcome this by replacing the picture in the command button instead? If so, how to go about?
Now I'm hidding one command button and making the other one visible...

Below the VBA code I'm using:

Private Sub Form_Current()

    If Nz(Me!txtBirthday, "") = "" Then
        Me!cmdBirthdayO.Visible = False
        Me!cmdBirthdayG.Visible = True
    Else
        Me!cmdBirthdayO.Visible = True
        Me!cmdBirthdayG.Visible = False
    End If

End Sub

 

[isladogs]

Why use 2 buttons?
The same button can fulfil more than one purpose depending on the circumstances

So you could use one button cmdBirthday and:
1. Set its backcolor, button caption & image in Form_Current if that's important to you
2. Use code in cmdBirthday_Click similar to this

If Nz(Me!txtBirthday, "") = "" Then
'do whatever code is currently in cmdBirthdayG_Click
Else
'do whatever code is currently in cmdBirthday)_Click
End If

 

[theDBguy]

Hi. If you're truly talking about using an image on a button, then you may be stuck with using separate buttons. But if you're just talking about label text and colors, then Colin's suggestion makes more sense.

 

[Siegfried]

Hi Colin,

Thanks again for the swift response and for your help.
I'm using two buttons because I once saw this in an old database example. So I was trying to go with this approach but then encountered the button load delay when opening the form. Which code can I use to change the command button picture? BirtdayGray.jpg for the default no textbox value, and BirthdayOrage.jpg when textbox value?

 

[theDBguy]

Hi Colin,

Thanks again for the swift response and for your help.
I'm using two buttons because I once saw this in an old database example. So I was trying to go with this approach but then encountered the button load delay when opening the form. Which code can I use to change the command button picture? BirtdayGray.jpg for the default no textbox value, and BirthdayOrage.jpg when textbox value?

Hi. I see. So, if you're using an external image for your buttons, then it should be possible to change the image dynamically on a single button. I thought you were using the built-in images in Access. I'll let Colin explain the process of changing the image using code. Cheers!

 

[isladogs]

Too kind DBG!

Place suitable (small) image files in the Insert Image Library on the Design ribbon

In each part of your If...Else..End If code, set cmdBirthday.Picture = "Orange" or cmdBirthday.Picture = "Grey" or whatever each image is called in the library

Also see if this link helps:https://stackoverflow.com/questions/33357544/how-could-i-use-vba-to-change-a-buttons-picture-to-one-of-the-embedded-default