Is your cloud always on? With an Always On cloud you won't have to worry about downtime for maintenance or software application code updates, ensuring that your bottom line isn't affected.
Private Sub btn1_Click() msgbox("Clicked") End Sub
Sub CheckIfWeHaveEventToRun() dim frm as form, ctl as control set frm=frm1 set ctl = frm("btn1") 'I need it this way because I don't know the name of the buttons, the real code will loop on all the controls on frm1 if ctl.OnClick > "" then msgbox("We Have Event") 'How can I run the event ????? 'Call btn1[Event Procedure] ??????? else msgbox("We Don't Have Event") end if end sub
Join the community of 500,000 technology professionals and ask your questions.