Pass Label to module
Posted on 2004-10-10
Hi - I'm trying to pass a label name from a form to a module.
I can pass the form name without any problems but label part is working properly.
Any suggestions? Also, I may pass the label name from another module.
'calling from form
Private Sub frmMain_Load()
Call AdjustLabelSize(Me, Label1)
'call from another module
Call AdjustLabelSize(frmMain, Label1)
Function AdjustLabelSize(iForm As Form, iLabel As Label)
iForm.ilabel.Width = 1300