Re: Unexplained label behavior

From: Dave the wave (Bogus1_at_softhome.net)
Date: 09/07/04 

Date: Tue, 7 Sep 2004 19:47:07 -0400

Ken:
Thanks much for your response.
I've tried moving the code around but it causes other problems. Here is the
code I used:

sfrmRepackTotals.lblTotalCases.Caption =
sfrmRepackTotals.tbxRepackTotalCases
sfrmRepackTotals.lblTotalInvestigations.Caption =
sfrmRepackTotals.tbxTotalInvestigations

The error message is:
Method or data member not found.

I tried putting a delay (For i = 1 to 100000) in the open event for the
subform, but that didn't help either. However initially I defined i as an
integer and set the end value to 100,000,000 which caused an overflow error.
After the error message box was closed the values appeared as expected.

What I don't understand about the problem being timing is that this subform
is not related/linked in anyway to either the main form or the other
subform.

I decided to create a Summary Query and used the Count and Sum values to
load the label controls. DUH! Works great. (I was previously calculating the
value directly from the table.)

Review of changes for posterity:
sfrmRepackTotals [record source = qryRepacksSummary] (2 fields in query:
SumRepackTotalCases, CountRepackID)

TEXT BOXES:
tbxRepackTotalCases=SumRepackTotalCases (from qryRepacksSummary)
tbxTotalInvestigations=CountRepackID (from qryRepacksSummary)

LABELS:
lblTotalCases.caption=tbxRepackTotalCases
lblTotalInvestigations.caption=tbxTotalInvestigations

Thanks again for your help. 

-- 
from
Dave the wave~~~~~
"Ken Snell [MVP]" <kthsneisllis9@ncoomcastt.renaetl> wrote in message 
news:Omn4TbSlEHA.3912@TK2MSFTNGP12.phx.gbl...
> Sounds as if there is a timing issue here...your code is running faster 
> than
> the form can load its data.
>
> Is your code running in the main form's Load event procedure? If yes, try
> moving the code for setting the values to the form's Activate event. If 
> that
> doesn't work you might try using the Current event of the subform that 
> runs
> the query.
>
> -- 
>
>        Ken Snell
> <MS ACCESS MVP>
>
> "Dave the wave" <Bogus1@softhome.net> wrote in message
> news:n4ednQiubtc-tqPcRVn-ig@adelphia.com...
>> I have a form with 2 subforms. The first subform displays based on an SQL
>> statement. The second is in the footer of the main form and is only there
> to
>> display 2 summary numbers from a separate query.
>>
>> At first I used text boxes and set their values from a query. The problem
>> was that (even with the tab stops set to no) when the form loaded the
> cursor
>> would hide the value. So I added 2 labels to the subform, 2 lines of code
> to
>> set the labels to the text box values and figured the problem was solved.
>>
>> When I open the form neither label has a value. If I make the code break
> and
>> then step through (using F8) the code the values appear as expected????
> I've
>> thrown in some MSGBOX commands to display the values of the text boxes 
>> and
>> sure enough they are blank, unless I step through the code????
>>
>> TABLE/FIELD:
>> Repacks/RepackNumber (reference number for each investigation)
>> Repacks/RepackTotalCases (number of cases involved.)
>>
>> FORMS:
>> frmIReview [no record source] just a container form.
>>
>> SUBFORMS:
>> sfrmIReview (which is working fine) no link between frmIReview and
>> sfrmIReview.
>> sfrmRepackTotals [record source = Repacks]
>>
>> LABELS:
>> lblTotalCases=Sum([RepackTotalCases])
>> lblTotalInvestigations=Count([RepackNumber])
>>
>> TEXT BOXES:
>> tbxRepackTotalCases
>> tbxTotalInvestigations
>>
>>
>> Here is my code:
>> Private Sub Form_Load()
>> Me.lblTotalCases.Caption = Me.tbxRepackTotalCases
>> Me.lblTotalInvestigations.Caption = Me.tbxTotalInvestigations
>> vartemp = MsgBox("Total Cases " & Me.tbxRepackTotalCases, vbOKOnly)
>>
>> End Sub
>>
>> I left one of the MSGBOX lines in to show how I was trying to determine
> what
>> the text box value was. If I step through the code the value is set,
>> otherwise the text box does not contain a value.
>>
>> If anyone might suggest where the problem lies, or knows of a better
>> way.....I am all ears and very grateful.
>>
>> -- 
>> from
>> Dave the wave~~~~~
>>
>>
>
>

Relevant Pages

  • Re: Unexplained label behavior
    ... > "Dave the wave" wrote in message ... >> The error message is: ... >> subform, ... >>>> set the labels to the text box values and figured the problem was ...
    (microsoft.public.access.formscoding)
  • Re: Labels not duplicated
    ... Sorry John, i hould add some additional info for you. ... that the subform is based on. ... the subform and the address from the query to create the labels. ...
    (microsoft.public.access.queries)
  • Re: Query with too many fields
    ... Is there some way that you can use a form and subform to do ... I am trying to create a query using 4 different tables. ... I get the "too many fields" error message. ... Task Listing New - Print Specs 100 fields ...
    (microsoft.public.access.queries)
  • Re: Unexplained label behavior
    ... which I assume is trying to refer to a control in the subform ... > I decided to create a Summary Query and used the Count and Sum values to ... >>> At first I used text boxes and set their values from a query. ... >>> set the labels to the text box values and figured the problem was ...
    (microsoft.public.access.formscoding)
  • Re: Apply filter problem
    ... The error message I get is: ... The subform is bound to a query. ... I'm having trouble with the syntax for applying a filter to a subform, ...
    (microsoft.public.access.forms)