Repeat a string: Difference between revisions

Content added Content deleted
Line 2,148: Line 2,148:
<br>'''Repeat a string'''<br>
<br>'''Repeat a string'''<br>
<lang VBA>Public Function RepeatStr(aString As String, aNumber As Integer) As String
<lang VBA>Public Function RepeatStr(aString As String, aNumber As Integer) As String
Dim bString As String
Dim bString As String, i As Integer
bString = ""
bString = ""
For i = 1 To aNumber
For i = 1 To aNumber