"Select Case" Amendment

There are some fields that needs to be flagged on multiple occassions based on criteria functions of the data entry. I need this flexibility.
'************
Public Function ChkCtl(ByRef mCtl As Control) As Boolean
  ChkCtl = True
        Select Case ExtractTag(mCtl.Tag, 2)
            Case "ne"
                If Len(Nz(mCtl.Value)) = 0 Then ChkCtl = False
            Case "1ne"
                If Len(Screen.ActiveForm.txtPermitNo) > 0 And Len(Nz(mCtl.Value)) = 0 Then ChkCtl = False
            Case "2ne"
                If Len(Screen.ActiveForm.cboSConnType) > 0 And Len(Nz(mCtl.Value)) = 0 Then ChkCtl = False
            Case ">0"
                If Not Nz(mCtl.Value) > 0 Then ChkCtl = False
            Case "tf"
                If Nz(mCtl.Value, 99) <> 0 And Nz(mCtl.Value, 99) <> -1 Then ChkCtl = False
        End Select
  Exit Function
End Function
' *********
The above worked with a Mandatory Field function at this link:
https://www.experts-exchange.com/questions/22861455/Tag-property-question.html

To achieve the new proposition, I have now organized form fields in five categories and set group tags
in each control in their respective groups as shown below.

I currently have a mandatory field check that seems limited sort off,
as such I want to amend it.

Since the tags are set based on their groups, I want to be able to
activate or de-activate group tags based on some criteria by calling the MyTag function
from the cboConnSize and Form's Current Event handlers.

****The example below are an idea...experts can use other methods****
_________
Example of Grouping of Tag properties.

    "ne"                  "1ne"                    "2ne"                 "3ne"                     "4ne"
txtcboName       txtPermitNo          txtPNo                txtCustomer         cboSupplier
txtHouseNo        txtPermitDate       txtPDate            txtCustPhone        txtSPhone
txtStreet                txtIssueDate        txtCertNo           txtCustFax            txtSFax
txtCity                     txtCIDAte             txtCertDate        txtCustCity            txtSCity
' ***************
For example:
I have 3 pages in my data entry sample form:

Page 0 = are form fields that will always be included in all mandatory check - the
                form fields are required at all time

Some of the form fields in Page1 and Page 2 of my data entry form are then added to Page0 to be checked based on the criteria defined below:
 
(a). If cboWConnType = "TA" And _
           cboServiveType = "DM" And _
            cboConnSize <= 2 Then
           
       ' Display (*) for the following:
         (a). Display all required fields in Page 0 in which the Tag properties are set [ne]
         (b), Display all required fields in Page 1 along with item (a) above where Tag fields are set to
                 [1ne]
          (c). Display all required fields in Page1 along with items (a) and (b) above WHERE Tag Fields
                 are set to [2ne].
         (d). Display all required fields in Page2 along with items (a) and (b) above WHERE Tag Fields
                 are set to [4ne].

(b).  (a). If cboWConnType = "WC" And _
           cboServiveType = "SP" And _
            cboConnSize => 3 Then
 
        ' Display (*) for the following:
         (a). Display all required fields in Page 0 in which the Tag properties are set [ne]
         (b), Display all required fields in Page 1 along with item (a) above where Tag fields are set to
                 [2ne]
          (c). Display all required fields in Page2 along with items (a) and (b) above WHERE Tag Fields
                 are set to [3ne].
          (d). Display all required fields in Page2 along with items (a) and (b) above WHERE Tag Fields
                 are set to [4ne].
 
Take note that tags [2ne] and [4ne] are common to the two criteria above.
 
Something like the select case below to work with my Existing "Mandatory Fields" Function would be great -  (See this link for Mandatory Function below).