Wie bekomme ich den Wert für 'Option Compare' zur Laufzeit?

Question

Kann man zur Fehlerbehebung den Wert Option Compare zur Laufzeit abrufen?

(Ich arbeite an einer Legacy-Windows Forms Anwendung, die InStr mit dem ersten Parameter verwendet als String (Drei-Parameter-Version von Instr), ohne den dritten Parameter, der dann durch Option Compare bestimmt wird. Option Compare Text macht angeblich InStr Groß- und Kleinschreibung ; der Standardwert ist Option Compare Binary.)

Answer 1

Die Optionseinstellung ist nur zur Kompilierzeit bekannt. Der Compiler behandelt dies mit dem OptionCompareAttribute-Attribut. Wenn es in einem optionalen Parameter vorhanden ist, ersetzt es die Optionseinstellung. Was diese Funktion inspiriert:

Function GetOptionCompare(<CompilerServices.OptionCompare()> _ 
          Optional ByVal Compare As CompareMethod = CompareMethod.Binary) As CompareMethod 
    Return Compare 
End Function 

Dies funktioniert jedoch aus unerfindlichen Gründen nicht. Punt das Problem, nehmen Sie einfach die Vorteile des Unterschiedes zwischen den Methoden zu vergleichen:

Function GetOptionCompare() As CompareMethod 
    Return IIf("A" = "a", CompareMethod.Text, CompareMethod.Binary) 
End Function 

passen Sie diese Option vergleichen kann eine pro-Quelldatei Einstellung, diese Funktion kann nur funktionieren, wenn Sie auf dem Visual Studio Standard verlassen. Das ist ein bisschen zweifelhaft. Nun, ziemlich zweifelhaft. Nun, es ist schlecht. Vermeiden Sie es, die Einstellung kennen zu müssen.