Imports System
Class Sample
Public Shared Sub Main()
Dim str As String
Dim pad As Char
str = "forty-two"
pad = "."c
Console.WriteLine(str.PadLeft(15, pad))
Console.WriteLine(str.PadLeft(2, pad))
End Sub 'Main
End Class 'Sample
/*
......forty-two
forty-two
*/