Vb.net – VStudio 2010 – Win 7
FORM Class Project Named ‘Notify’
With Reference to ZonesLib - Successful Build
Standard Class Project Named ‘ZonesLib’ - Successful Build
FORM Class Project Named ‘Notify’
With Reference to ZonesLib - Successful Build
Code:
Public Class Alarms Private Sub myAlarms_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load End Sub ‘In code just below am trying to Set iSkip Property in ZonesLib.TimerProc to True using AddHandler event ‘The code runs but nothing happens… missing args?? something stupidly simple in my AddHandler code or event handler code ?? Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click AddHandler Button1.Click, AddressOf ZonesLib.TimerProc.SetSkip Me.Close() End Sub End Class
Standard Class Project Named ‘ZonesLib’ - Successful Build
Code:
Public Class TimerProc
Public Shared Sub SetSkip(sender As System.Object, e As System.EventArgs)
iSkip = True
MsgBox("Skip")
End Sub
Private Shared _iSkip As Boolean = False
Public Shared Property iSkip() As Boolean
Get
iSkip = _iSkip
End Get
Set(ByVal value As Boolean)
_iSkip = value
End Set
End Property
End Class
Comment