Yo tampoco comprendo la pregunta pero me imagino que pretendes conocer el estado en el qu se encuentra el botón.
Puedes hacer lo que ya te sugiere acertadamente ROBER.29 o utilizar la propiedad TAG para almecenar su estado. Algo así como.
Código:
me.CmdButton01.Tag = "false"
'Modo A
private sub CmdButton01_Click()
me.CmdButton01.Tag = Not (me.CmdButton01.Tag)
end sub
Modo B
private sub CmdButton01_Click()
me.CmdButton01.Tag = iif(me.CmdButton01.Tag="false","true","false")
end sub sto junto al color de fondo, la imágen o el borde te permitirá simular si el botón está presionado/liberado.
En los métodos que son propiedad de un evento (En este caso del botón) o bien no se puede o no se deben poner parámetros que el evento no controla.