In your first post you asked for some code.
Here is some code showing how a toggle button could be used.
Notice how the data sort order (see AName column) changes.
I am attaching some jpgs to show the effect of clicking the toggle with the sample code.
Below is the code for the Form Load event, and the Toggle click event
Form Load code
Code:
Private Sub Form_Load()
Dim sCaption As String
Me.RecordSource = "SELECT A.AnimalId, A.SightingDate, A.GPSLat, A.GPSLong, Animal.AName, AnimalCapture.CaptureDate" _
& " FROM (AnimalLocs AS A INNER JOIN Animal ON A.AnimalId = Animal.AnimalId) INNER JOIN AnimalCapture ON Animal.AnimalId = AnimalCapture.AnimalId " _
& " ORDER By Aname ASC;"
sCaption = "Toggle To Sort on AName"
Me.Label16.Caption = sCaption
End Sub
Toggle Click code
Code:
Private Sub Toggle13_Click()
If Me.Toggle13 = True Then
Me.Label16.ForeColor = vbBlack
Me.Label16.Caption = "DESCENDING"
Me.RecordSource = Replace(Me.RecordSource, " ASC", " DESC")
Else
Me.Label16.ForeColor = vbBlue
Me.Label16.Caption = "ASCENDING"
Me.RecordSource = Replace(Me.RecordSource, " Desc", " ASC")
End If
Me.Requery
End Sub