'Definition
 
Sub Test(a as String,b as String,c as String,d as String)
...
Sub Test(a as String,b as String,c as String,d as Integer)
...
Sub Test(a as String,b as String,c as String,d as Double)
...

'Aufruf
 
Dim i as Integer = 1
Dim d as Double = 1.23
 
Test("Hallo", 1, i, 3)
Test(1,"Hallo", 2, d)