Try to create custom class with
overloaded methods[
^].
Public Class MyClassWithOverloadedMethods
public shared sub myfunctionname(Byval Dataset1 as Dataset)
If(Dataset1.tables.count>0) Then
End If
End Sub
public shared sub myfunctionname(optional Byval Dataset1 as Dataset,optional Byval xml as XmlDocument)
If(xml.HasChildNodes)
End If
End Sub
End Class
How to use?
Dim mc As MyClassWithOverloadedMethods = New MyClassWithOverloadedMethods()
mc.myfunctionname(DatasetObject)
No matter of type of object passed into
myfunctionname
program executes proper procedure ;)