Do these need to be const?

@lonitra VB recommends they be, not sure it's required. If you are asking why are they not inlined? It makes the longs too long and this seemed cleaner than wrapping them.

Now that we've made these changes, could you check if it is still giving you trouble if these are not consts?

@lonitra They don't need to be constants they could be Dim'ed but if I inline them the lines are too long.

Instead of declaring them (with Const or Dim) I could inline and wrap the lines if you think that would be better.

We have an EnumDataAttribute which takes all of the values in the enum. Can that be used here? Then we won't need to add AuthenticationModeData class. Same with ShutdownModeData

@lonitra I tried using them (it would be a lot simpler and also address the Const issue above) and while they worked previously I can't get the latest version of the VB compiler to resolve the reference it's like they don't exist but Intellisence suggests them while typing and I have been unable to fix it. Any help here would be appreciated.

Ah it looks like vb doesn't support generic types in attributes unfortunately https://learn.microsoft.com/dotnet/visual-basic/misc/bc32066 I would prefer not to keep creating classes every time we want to test a set of enum values. Could you investigate creating a generic class to serve this purpose? Perhaps we can convert your implementation of AuthenticationModeData to make it generic for any enum value or try creating another EnumDataAttribute which does not take generic type and instead we pass type to its constructor.

@lonitra I don't know C# well enough to create the TheoryData, and my In VB I can create the Class I don't know how to use it to create TheoryData to use in a test.

    Public Class EnumTestData
        Implements IEnumerable(Of Object())

        Private ReadOnly _enumType As Type

        Public Sub New(TEnum As Type)
            _enumType = TEnum
        End Sub

        Public Iterator Function GetEnumerator() As IEnumerator(Of Object()) Implements IEnumerable(Of Object()).GetEnumerator
            For Each mode As [Enum] In [Enum].GetValues(_enumType)
                Yield {mode}
            Next
        End Function

        Public Function IEnumerable_GetEnumerator() As IEnumerator Implements IEnumerable.GetEnumerator
            Return GetEnumerator()
        End Function
    End Class
        <WinFormsFact>
        Public Sub EnumDataIteratorTests()
            Dim testClass As New EnumTestData(GetType(AuthenticationMode))
            testClass.IEnumerable_GetEnumerator.Should.NotBeNull()
            testClass.Any.Should.BeTrue()
        End Sub

@lonitra I did create something that works but I am not sure it is better.

Now that we've made these changes, could you check if it is still giving you trouble if these are not consts?