Public Class Tester Public Shared Sub Main Console.WriteLine(StrDup(30, "-")) End SubEnd Class ------------------------------