In access, I have a form where I'm trying to assign the same
method to a bunch of different Labels (acting as buttons);
without creating event code for each label. I'm trying to do
this by putting Event Code inside of a class module, and assigning
a control to the new object.
Below is what I've cobbled together just to see if I could
get 1 label to fire code when clicked.
To save my life, I cannot get this to work.
'Form_Assets Form Module
Public cb as cButton
Private Sub Form_Load()
set cb = New cButton
set cb.lbBUTTON = Me.lblPARCELS_NEW
'cBUTTON Class Module
Public WithEvents lbBUTTON As Label
Private Sub lbBUTTON_Click()
MsgBox "WORK STUPID!!!"