Buchempfehlung
MySQL kurz & gut
MySQL kurz & gut
Das preiswerte Taschen- buch stellt MySQL-rele- vante Inhalte systematisch und knapp dar, sodass es sich optimal zum Nach- schlagen beim Pro- grammieren eignet. [Mehr Infos...]
FreeBASIC-Chat
Es sind Benutzer im FreeBASIC-Chat online.
(Stand:  )
FreeBASIC bei Twitter
Twitter FreeBASIC-Nachrichten jetzt auch über Twitter erhalten. Follow us!

fb:porticula NoPaste

Info
Info / Hilfe Liste
Übersicht / Liste Neu
Datei hochladen Suche
Quellcode suchen Download
Dateidownload

Function StringWiederholung

Uploader:AdministratorSebastian
Datum/Zeit:18.06.2007 20:04:08

FUNCTION StringWiederholung(Muster As String, Anzahl As UInteger) As String
Dim As Integer i
Dim As String temp
IF Anzahl = 0 THEN EXIT FUNCTION
temp = ""
For i = 1 to Anzahl
    temp += Muster
NEXT i
StringWiederholung = temp
END FUNCTION