RosettaCodeData/Task/Repeat-a-string/REALbasic/repeat-a-string.realbasic

8 lines
172 B
Text
Raw Permalink Normal View History

2013-04-10 23:57:08 -07:00
Function Repeat(s As String, count As Integer) As String
Dim output As String
For i As Integer = 0 To count
output = output + s
Next
Return output
End Function