diff --git a/Version Control.accda.src/dbs-properties.json b/Version Control.accda.src/dbs-properties.json
index aac4f2ea..762e73da 100644
--- a/Version Control.accda.src/dbs-properties.json	
+++ b/Version Control.accda.src/dbs-properties.json	
@@ -41,7 +41,7 @@
       "Type": 10
     },
     "AppVersion": {
-      "Value": "3.4.15",
+      "Value": "3.4.16",
       "Type": 10
     },
     "Auto Compact": {
diff --git a/Version Control.accda.src/forms/frmVCSOptions.bas b/Version Control.accda.src/forms/frmVCSOptions.bas
index 39c38c75..eeeb2ba7 100644
--- a/Version Control.accda.src/forms/frmVCSOptions.bas	
+++ b/Version Control.accda.src/forms/frmVCSOptions.bas	
@@ -16,10 +16,10 @@ Begin Form
     Width =10080
     DatasheetFontHeight =11
     ItemSuffix =236
-    Left =-25575
-    Top =1710
-    Right =-5925
-    Bottom =14295
+    Left =3225
+    Top =2430
+    Right =22695
+    Bottom =15015
     RecSrcDt = Begin
         0x79e78b777268e540
     End
@@ -3712,7 +3712,7 @@ Private Sub Form_Load()
     With Me.cboSanitizeLevel
         .RowSource = vbNullString
         For intSanitizeLevel = 0 To (eSanitizeLevel.[_Last] - 1)
-            .AddItem intSanitizeLevel & "," & Options.GetSanitizeLevelName(intSanitizeLevel)
+            .AddItem intSanitizeLevel & ";" & Options.GetSanitizeLevelName(intSanitizeLevel)
         Next intSanitizeLevel
     End With
     
@@ -3720,7 +3720,7 @@ Private Sub Form_Load()
     With Me.cboSanitizeColors
         .RowSource = vbNullString
         For intSanitizeLevel = 0 To (eSanitizeLevel.[_Last] - 1)
-            .AddItem intSanitizeLevel & "," & Options.GetSanitizeLevelName(intSanitizeLevel)
+            .AddItem intSanitizeLevel & ";" & Options.GetSanitizeLevelName(intSanitizeLevel)
         Next intSanitizeLevel
     End With
     
diff --git a/Version Control.accda.src/vbe-project.json b/Version Control.accda.src/vbe-project.json
index 14df9ed3..702af789 100644
--- a/Version Control.accda.src/vbe-project.json	
+++ b/Version Control.accda.src/vbe-project.json	
@@ -5,7 +5,7 @@
   },
   "Items": {
     "Name": "MSAccessVCS",
-    "Description": "Version 3.4.15 deployed on 7/20/2021",
+    "Description": "Version 3.4.16 deployed on 9/10/2021",
     "FileName": "Version Control.accda",
     "HelpFile": "",
     "HelpContextId": 0,
diff --git a/Version Control.accda.src/vcs-options.json b/Version Control.accda.src/vcs-options.json
index 8227d225..335b0a67 100644
--- a/Version Control.accda.src/vcs-options.json	
+++ b/Version Control.accda.src/vcs-options.json	
@@ -1,6 +1,6 @@
 {
   "Info": {
-    "AddinVersion": "3.4.15",
+    "AddinVersion": "3.4.16",
     "AccessVersion": "14.0 32-bit"
   },
   "Options": {