### Fill String

Fill a string with blanks up to len chars
`Sub FillStr(s As String, len As Int) As String
For i = s.Length To len - 1
s = s & Chr(32)
Next
Return s
End Sub`
Fill a string with a char up to len chars
`Sub FillStrWithChar(s As String, c As Char, len As Int) As String
For i = s.Length To len - 1
s = s & c
Next
Return s
End Sub`
Fill a string with blanks up to len chars with error handling
`Sub FillStr(s As String, c As Char, len As Int) As String
Try
For i = s.Length To len - 1
s = s & c
Next
Catch
Log(LastException)
End Try
Return s
End Sub`

Changed: , Category: Strings, File: T6C255M1850.htm, ID: 1850