I've got a form with several checkboxes on, ticked according to whether th evalue is tru or not. -Well sort of.
The code I have so far:
Private Sub Form_Current()
If Material <> "" Then
Do
If Material = "composites" Then
ChkComposites = True
End If
If Material = "metal" Then
ChkMetal = True
End If
etc....
If Material = "other" Then
ChkOthers = True
End If
DoCmd.GoToRecord acForm, "RelatedMaterials", acNext, 1
Loop
End If
End Sub
I get an error message at the end, because it doesn't recognise the end, that there is no records.
Can do any kind of modifications to the above, as this is the closest I've managed to get.
Or... I was thinking about doing a loop, so if there are 3 records gained from the query, then do the loop 3 times, but I haven't even got close...
I've been looking into .EOF and RecordCount, but no luck so far...
My access experience is 9 days!! So I need help!!!
The code I have so far:
Private Sub Form_Current()
If Material <> "" Then
Do
If Material = "composites" Then
ChkComposites = True
End If
If Material = "metal" Then
ChkMetal = True
End If
etc....
If Material = "other" Then
ChkOthers = True
End If
DoCmd.GoToRecord acForm, "RelatedMaterials", acNext, 1
Loop
End If
End Sub
I get an error message at the end, because it doesn't recognise the end, that there is no records.
Can do any kind of modifications to the above, as this is the closest I've managed to get.
Or... I was thinking about doing a loop, so if there are 3 records gained from the query, then do the loop 3 times, but I haven't even got close...
I've been looking into .EOF and RecordCount, but no luck so far...
My access experience is 9 days!! So I need help!!!