Public Class Test
 
Public Sub New(ByVal R As Byte)
 
End Sub 
 
Public Sub New(ByVal R As Double)
 
End Sub 
 
End Class

Dim T as new Test(200)

Dim T as new Test(200.0)

__________________________________________________________________________
Ein Programmierer ist eine Maschine die Koffein in Programmcode umwandelt!
Und Bier in Bug?s

May the source code be with you.