public Sub TestCall(TestSubString As String)
Try
Log("Calling sub in Main")
CallSub(Main, TestSubString & "_Data")
Log("Calling sub in Class")
CallSub(Me, TestSubString & "_Data")
Catch
Log("Catch")
Log(LastException)
End Try
End Sub
Sub Refresh_Data
Log("------------> Class Refresh data")
End Sub