Is it possible to display the results of a query in an txt box? 3

[Enea]

I have created a little training log for myself.
When I select an activity from a dropdown box I would like to immediately display a weekly total (time engaged) for that activity.

I already have the query but what I would like to know is:
is it possible to display the result of the query in my form. If yes, how do I do that?

SELECT [qryWeeklyTotals].[WeeklyTotals]
FROM qryWeeklyTotals
WHERE [qryWeeklyTotals].[activity]=[forms]![frmLog]!activity;

 

[TheAceMan1]

How are ya Enea . . .

Sure! Return the value(s) from a function based on a recordset:

[blue]Public Function WkTlt()
   Dim db As DAO.Database, rst As DAO.Recordset
   Dim Build As String, SQL As String, NL As String
   
   Set db = CurrentDb
   NL = vbNewLine
   SQL = "SELECT [WeeklyTotals] " & _
         "FROM qryWeeklyTotals " & _
         "WHERE ([activity]=" & [Forms]![frmLog]!activity & ");"
   Set rst = db.OpenRecordset(SQL, dbOpenDynaset)
   
   If Not rst.BOF Then
      Do
         If Build = "" Then
            Build = Format(rst!WeeklyTotals, "Currency")
         Else
            Build = NL & Format(rst!WeeklyTotals, "Currency")
         End If
         
         rst.MoveNext
      Loop Until rst.EOF
   End If
   
   WkTlt = Build
   
End Function[/blue]

Then something like:

[blue]   Me![purple][b]TextboxName[/b][/purple] = WkTlt()
or
   =WkTlt()[/blue]

See Ya! . . . . . .

 

[PHV]

You may simply consider the DLookUp function.

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886

 

[Enea]

Wonderful. Thank you AceMan1.

Thank you PHV for suggesting an alternative option.

 

[robertsfd]

What I have always done is displayed it in a listbox (sized like a textbox) and put the SQL as the Row Source.

Since I'm not an expert (or even an intermediate), I don't know if there is a reason NOT to do it this way. But it definitely works.