Hi,
I suggest to use one sub to build the value to be saved, which you call from each Check_AfterUpdate()"
Private Sub CheckX_AfterUpdate()
ChangeDatabaseValue()
End Sub
Private Sub ChangeDatabaseValue()
If Me!Check1 then Me!Features = "value1"
If Me!Chekc2 then Me!Features = Me!Features...