We value your feedback.
Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!
Private Sub cmdRandom_Click() Dim dbs As Database Dim rst As Recordset Set dbs = CurrentDb strSQL = "Select Total From [qryEditNewSummary]" Set rst = dbs.OpenRecordset(strSQL, dbOpenDynaset) MsgBox rst!Total End Sub
Join the community of 500,000 technology professionals and ask your questions.