I suggest using:
If AL.JoinString <> True & True & True & True Then
Instead of
If AL.JoinString <> "TrueTrueTrueTrue" Then
In TestTypeBool() because of languages other than English.
In my case, I am Brazilian and my Office and Windows language is Pt-Br, AL.JoinString returns "VerdadeiroVerdadeiroVerdadeiroVerdadeiro" and the test fails.
I suggest using:
If AL.JoinString <> True & True & True & True Then
Instead ofIf AL.JoinString <> "TrueTrueTrueTrue" Then
In TestTypeBool() because of languages other than English.In my case, I am Brazilian and my Office and Windows language is Pt-Br, AL.JoinString returns "VerdadeiroVerdadeiroVerdadeiroVerdadeiro" and the test fails.