Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

COMMAND BUTTON CAPTION

0 views
Skip to first unread message

Chai

unread,
Apr 13, 2010, 10:39:01 AM4/13/10
to
I need a code that when I click on a button the command button says
"Something", and when clicked again says "Something else", and so on and so
forth, for example.

Thank you!

Al Campagna

unread,
Apr 13, 2010, 11:31:47 AM4/13/10
to
Chai,
Try this sample code. Use your own object names...
Note that two caption changes should also relate to two separate
code actions.

Private Sub cmdYourButtonName_Click()
If cmdYourButtonName.Caption = "Something" Then
cmdYourButtonName.Caption = "Something Else"
' *** You just clicked the Something button so...
' *** insert the Something code here...
Else
cmdYourButtonName.Caption = "Something"
' *** you just clicked the Something Else button so...
' *** insert the Something Else code here...
End If
End Sub
--
hth
Al Campagna
Microsoft Access MVP 2007-2009
http://home.comcast.net/~cccsolutions/index.html

"Find a job that you love... and you'll never work a day in your life."

"Chai" <Ch...@discussions.microsoft.com> wrote in message
news:0ADD8FDD-5F97-452C...@microsoft.com...

Douglas J. Steele

unread,
Apr 13, 2010, 11:33:00 AM4/13/10
to
Private Sub MyButton_Click()

Select Case Me!MyButton.Caption
Case "Caption1"
Me!MyButton.Caption = "Caption2"
Case "Caption2"
Me!MyButton.Caption = "Caption3"
Case "Caption3"
Me!MyButton.Caption = "Caption1"
Case Else
Me!MyButton.Caption = "ERROR"
End Select

End Sub


--
Doug Steele, Microsoft Access MVP
http://www.AccessMVP.com/DJSteele
(no e-mails, please!)

"Chai" <Ch...@discussions.microsoft.com> wrote in message
news:0ADD8FDD-5F97-452C...@microsoft.com...

0 new messages