Function myName(byVal x as integer) as integer
erwartet einen Übergabeparameter! Versuche es als normale sub()