fb:porticula NoPaste

Info / Hilfe Liste

Übersicht / Liste Neu

Datei hochladen Suche

Quellcode suchen

Dateidownload

SUB mit Argument

Uploader:	Sebastian
Datum/Zeit:	04.09.2011 18:55:29

'Ganz einfaches Beispiel zur Ausgabe von Text durch ein Unterprogramm

'Als Beilage für eine Chatrunde.

'Erstellt: 04.09.2011

'Compilieren mit: FB 0.23.0



Declare Sub GibOftAus (ByRef s As String)



GibOftAus ("Hallo")

GibOftAus ("Welt")



Sleep

End







Sub GibOftAus (ByRef s As String)

    For i As integer = 1 To 10

        Print s; " ";

    Next i

    Print ""

End Sub

Impressum • Nutzungsbedingungen • Datenschutz

Microsoft, Windows, Windows NT, XBOX und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.