Ciao ho creato una Classe con una proprieta, enumerata ma quando cerco di leggere il suo valore mi risponde sempre 0.
codice:Dichiarazione Public Class frmAvvio Inherits System.Windows.Forms.Form 'variabili oggetto Public m_opType As Operation Public Property opType() As Operation Get Return Me.m_opType End Get Set(ByVal Value As Operation) Me.m_opType = Value End Set End Property Public Enum Operation As Integer Nuovo Modifica Invio CaricaNew CaricaMod ChronNew ChronMod NuovoMan Preview End Enumcodice:Assegnazione Private Sub loadForm(Optional ByVal bOperation As Operation = Operation.Nuovo) Dim frm As New frmData opType = bOperation frm.Show() End SubSe intercetto il valore in loadForm é corretto ...codice:Retreive da altro form Private Sub initOperation() Dim frm As New frmAvvio lblUserName.Text = frmAvvio.bUserName lblOperation.Text = CType(frm.opType, String) 'Debug.WriteLine(frmAvvio.opType) End Sub


Rispondi quotando