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

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