Fill up a string with given char

General
2

Here’s an extension function that you can put in a module for left or right padding:

Public Function Pad(extends input as String, padCharacter as String = "0", left as Boolean = True, toLength as Integer = 16) As String
  '// Example usage
  '   Var s as String = "1011"
  '   s = s.Pad("0", False, 8)
  '   
  '   Result: 10110000
  var data() as String = input.ToArray( "" )
  var originalLength as Integer = data.LastIndex
  
  for index as Integer = originalLength to toLength - 2
    if left then
      data.AddAt( 0, padCharacter )
    else
      data.Add( padCharacter )
    end if
  next
  
  Return String.FromArray( data, "" )
End Function
1 Like