Re: Programatically returning a label number
- From: "Douglas J Steele" <NOSPAM_djsteele@xxxxxxxxxxxxxxxxx>
- Date: Tue, 31 Jan 2006 09:41:35 -0500
I'm not sure there's an easy solution to this using labels, since labels
don't show up as ActiveControl.
You could try using text boxes instead of labels (make them locked, so that
the user can't change what's in them), so that you can have a generic
function that refers to ActiveControl.
To use a same generic function for the Click event for a number of controls,
select each of the controls, then look at the properties. Put
=FunctionName() in the OnClick property box. Make sure you put the () after
the function name. (And yes, it must be a function, not a sub, even if it
doesn't return anything)
--
Doug Steele, Microsoft Access MVP
http://I.Am/DougSteele
(no e-mails, please!)
"Biz Enhancer" <BizEnhancer@xxxxxxxxxxxxxxxxxxxxxxxxx> wrote in message
news:E5677513-B1DA-4CF5-AB97-EF4FB27CF41C@xxxxxxxxxxxxxxxx
> I have a form that has an image as the main item on it. th image is an
> exploded schematic of an appliance with parts references on it.
>
> The problem is that I have placed labels over the parts references and on
> the click event of the label the following code runs.
>
> Private Sub Label4_Click()
> On Error GoTo Err_Click
>
> Dim stDocName As String
> Dim stLinkCriteria As String
>
> stDocName = "Part"
> stLinkCriteria = "Partid =" & Me.Label4.Caption
> DoCmd.OpenForm stDocName, , , stLinkCriteria
>
> Exit_Click:
> Exit Sub
>
> Err_Click:
> MsgBox Err.Description
> Resume Exit_Click
> End Sub
>
> The caption contains the PartID
> This works fine, however, the seven forms like this seem to have so much
> code that the database is blowing up to 85 meg. I have used compact and
the
> image itself is under 250K.
>
> What I want to try to do is to convert this to a function but have so far
> been unsuccessful at being able to return the label number into the code
> programatically. Each form may have up to 70 labels with events attached.
>
>
> Thanks in advance.
.
- Follow-Ups:
- Re: Programatically returning a label number
- From: Biz Enhancer
- Re: Programatically returning a label number
- References:
- Programatically returning a label number
- From: Biz Enhancer
- Programatically returning a label number
- Prev by Date: Re: using option group to auto populate a date field?
- Next by Date: Why doesn't this work? Just curious...
- Previous by thread: Programatically returning a label number
- Next by thread: Re: Programatically returning a label number
- Index(es):
Relevant Pages
|
