Microsoft Access 2003-텍스트 필드를 채우는 여러 확인란

Access 2003을 사용하고 있는데, 텍스트 필드를 채우는 양식의 확인란을 사용하는 데 도움이 필요합니다.

확인란을 사용하여 텍스트 필드를 채우려면 다음 코드를 사용하고 있습니다.

Private Sub CAN_Click()
If Me.CAN = -1 Then
    Me.[Subdirectorate Services] = "Community Adult Nursing"
    Else
    Me.[Subdirectorate Services] = ""
    End If
    Exit Sub
End Sub

다양한 서비스를 기록하기 위해 약 20 개의 확인란이 있으며 여러 옵션을 선택할 수 있습니다. 위의 코드는 확인란을 선택하고 필요한 텍스트를 텍스트 필드로 전송하지만 다른 확인란을 선택하면 텍스트 상자를 덮어 씁니다.

텍스트 상자를 여러 항목으로 업데이트하려면 어떻게해야합니까?

대신 여러 값을 연결하는 데
Me.[Subdirectorate Services] = "Community Adult Nursing"
사용할 수 있습니다
Me.[Subdirectorate Services] = Me.[Subdirectorate Services] & ", " & "Community Adult Nursing".

전체 코드 로직 (정확한 코드 아님)의 경우 :

Me.[Subdirectorate Services]=""  
If Me.CAN = -1 Then _ 
   Me.[Subdirectorate Services] = Me.[Subdirectorate Services] & ", " & "Community Adult Nursing"
If Me.CAN2 = -1 Then _  
   Me.[Subdirectorate Services] = Me.[Subdirectorate Services] & ", " & "text 2"
...
If Me.[Subdirectorate Services] <> "" then _  
   Me.[Subdirectorate Services] = Left(Me.[Subdirectorate Services]="",Len(Me.[Subdirectorate Services]="")-2)

마지막 행은 ,문자열 끝에서 제거 하는 것입니다.