Initializing Array in Structure in module outside of subroutine

Question

I have the following declared in a module (simplified for example):

Public Structure ActiveDeviceInfo
    Dim InStream As String
    Dim InMsg() As String
    Dim OutMsg() As String

    Public Sub Initialize()
        ReDim InMsg(30)
        ReDim OutMsg(30)
    End Sub
End Structure

then right after that I create the instance for the module. I need it to have the scope of the whole module instead of the individual subroutines.

Public ActiveRelay As New ActiveDeviceInfo
ActiveRelay.Initialize()

I'm getting the 'Declaration Expected' error on the Initialization call.
Any ideas on how to fix this?

Stryner · Accepted Answer · 2014-09-25 23:41:35Z

2

You could add it in the static constructor for the module:

Public Module Module1
    Public ActiveRelay As New ActiveDeviceInfo

    Sub New()
        ActiveRelay.Initialize()
    End Sub

    'Struct Here
End Module

answered Sep 25, 2014 at 23:41

Stryner

7,3363 gold badges21 silver badges20 bronze badges

Sign up to request clarification or add additional context in comments.

Comments

Michael Petch · Accepted Answer · 2014-09-25 23:43:47Z

1

Just inside the module definition I would put:

Dim ActiveRelay As New ActiveDeviceInfo

And then in individual subroutines just call:

ActiveRelay.Initialize()

If you want to call an initialized when an object is created one could switch to a Class with a constructor.Something like:

Dim ActiveRelay As New ActiveDeviceInfo

Public Class ActiveDeviceInfo
    Dim InStream As String
    Dim InMsg() As String
    Dim OutMsg() As String

    Public Sub Initialize()
        ReDim InMsg(30)
        ReDim OutMsg(30)
    End Sub

    Sub New()
        Initialize()
    End Sub
End Class

This would run New() when the class is instantiated.

edited Sep 25, 2014 at 23:43

answered Sep 25, 2014 at 23:36

Michael Petch

48.1k9 gold badges122 silver badges219 bronze badges

4 Comments

Lance Roberts Over a year ago

Yes, but it would then reinitialize the arrays, and I'm looking more for a global/static concept.

Michael Petch Over a year ago

Is it required you create this as a Structure. How about as a Class?

Lance Roberts Over a year ago

No, not required. I'm converting VB6 code over and for now I'm just trying to get it to work, then I'll go back later and re-factor.

Lance Roberts Over a year ago

Thanks, I may use that when I refactor.

Collectives™ on Stack Overflow

Initializing Array in Structure in module outside of subroutine

2 Answers 2

Comments

4 Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

2 Answers 2

Comments

4 Comments

Your Answer

Sign up or log in

Post as a guest

Related