G
Galen Somerville
In two different Form modules
FFTcls.Currfrm = Me
In FFTcls class module
Dim CurrForm As System.Windows.Forms.Form
Public WriteOnly Property Currfrm() As System.Windows.Forms.Form
Set(ByVal Value As System.Windows.Forms.Form)
CurrForm = Value
End Set
End Property
In a sub in FFTcls module
CType(CurrForm, Label).LabMsg.Caption = clsRes.LoadResStgA(210)
Error on last line is that currform does not contain label. I have tried
many different combinations within the Ctype( )
The problem is I have eight labels in the Form module that may need
updating. I'm trying to avoid eight Property statements by using a late
bound thingy.
Also I don't want to make eight calls in the Form modules if only one label
has changes.
GalenS
FFTcls.Currfrm = Me
In FFTcls class module
Dim CurrForm As System.Windows.Forms.Form
Public WriteOnly Property Currfrm() As System.Windows.Forms.Form
Set(ByVal Value As System.Windows.Forms.Form)
CurrForm = Value
End Set
End Property
In a sub in FFTcls module
CType(CurrForm, Label).LabMsg.Caption = clsRes.LoadResStgA(210)
Error on last line is that currform does not contain label. I have tried
many different combinations within the Ctype( )
The problem is I have eight labels in the Form module that may need
updating. I'm trying to avoid eight Property statements by using a late
bound thingy.
Also I don't want to make eight calls in the Form modules if only one label
has changes.
GalenS