Public Sub Moo(ByVal Var1 As Integer, ByVal Var2 As String, ByVal VarXYZ As Byte, ByVal Var4 As Object, ByVal Var5 As Date, ByVal Var6 As Long, ByVal Var7 As Double)

    Foo Var1, _
        Var2, _
        VarXYZ, _
        Var4
    Foo Var1, Var2, _
        VarXYZ, Var4, _
        Var5

End Sub

Public Sub Foo( _
               ByVal _
               Var1 _
               As _
               Integer _
               , _
               ByVal Var2 As String, ByVal Var3 As Byte, _
               Optional ByVal Var4 As Object, Optional ByVal Var5 As Date, _

var expectedDiagnostic = new DiagnosticResult
{
	Id = TestAnalyzer.DiagnosticId,
	Message = string.Format(TestAnalyzer.Message, "Method"),
	Severity = TestAnalyzer.Severity,
	Locations =
	new[]
	{
		new DiagnosticResultLocation("Test0.cs", 10, 24)
	}
};

public override bool Equals(object obj)
{
    var other = (DisplayLanguageSetting) obj;
    return Code.Equals(other.Code);
}

For Each rng In Range("BL1:BL13000")