Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht Das deutsche QBasic- und FreeBASIC-Forum
Für euch erreichbar unter qb-forum.de, fb-forum.de und freebasic-forum.de!
 
FAQFAQ   SuchenSuchen   MitgliederlisteMitgliederliste   BenutzergruppenBenutzergruppen  RegistrierenRegistrieren
ProfilProfil   Einloggen, um private Nachrichten zu lesenEinloggen, um private Nachrichten zu lesen   LoginLogin
Zur Begleitseite des Forums / Chat / Impressum
Aktueller Forenpartner:

Array an Unterprogramm übergeben

 
Neues Thema eröffnen   Neue Antwort erstellen    Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht -> Allgemeine Fragen zu FreeBASIC.
Vorheriges Thema anzeigen :: Nächstes Thema anzeigen  
Autor Nachricht
roteo



Anmeldungsdatum: 31.07.2014
Beiträge: 15
BeitragVerfasst am: 03.08.2014, 15:01    Titel: Array an Unterprogramm übergeben Antworten mit Zitat
Hallo zusammen,

ich würde gerne wissen, wie ich einen Array an eine Subroutine übergebe. Dazu habe ich in den Tutorials / der Referenz nichts gefunden. Kann mir bitte jemand weiterhelfen? Ich danke euch?

Gruß, Roteo
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
Sebastian
Administrator


Anmeldungsdatum: 10.09.2004
Beiträge: 5969
Wohnort: Deutschland
BeitragVerfasst am: 03.08.2014, 15:58    Titel: Array an Unterprogramm übergeben Antworten mit Zitat
Hallo,

hier ein Beispiel zur Übergabe eines Arrays an ein Unterprogramm:

Code:
Declare Sub GibLottoZiehungAus (Zahlen() As Integer)

Dim ziehung1 (1 to ...) As Integer = {  9, 10, 11, 12, 13, 37 }
Dim ziehung2 (1 to ...) As Integer = { 10, 17, 25, 36, 41, 45 }


GibLottoZiehungAus (ziehung1())
GibLottoZiehungAus (ziehung2())

getkey
end



Sub GibLottoZiehungAus (Zahlen() As Integer)
   Print "Lottozahlen:  ";
   For i As Integer = LBound(Zahlen) To UBound(Zahlen)
      Print "(";
      If (Zahlen(i) < 10) Then Print " ";
      Print Str(Zahlen(i)); ") ";
   Next i
   Print ""
End Sub


Viele Grüße!
Sebastian
_________________

Die gefährlichsten Familienclans | Opas Leistung muss sich wieder lohnen - für 6 bis 10 Generationen!
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden Website dieses Benutzers besuchen
Elor



Anmeldungsdatum: 12.07.2013
Beiträge: 205
Wohnort: Konstanz
BeitragVerfasst am: 03.08.2014, 17:42    Titel: Antworten mit Zitat
Hallo,
im FreeBasic - Portal wird die Übergabe von Parameter an Unterprogramme in der FB Referenz beschrieben, u.a auch Array's.
http://www.freebasic-portal.de/befehlsreferenz/parameteruebergabe-453.html
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
roteo



Anmeldungsdatum: 31.07.2014
Beiträge: 15
BeitragVerfasst am: 03.08.2014, 18:57    Titel: Antworten mit Zitat
Hallo Sebastian und Elor,

danke für eure Hilfe. lächeln

Gruß, Roteo
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
Beiträge der letzten Zeit anzeigen:   
Neues Thema eröffnen   Neue Antwort erstellen    Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht -> Allgemeine Fragen zu FreeBASIC. Alle Zeiten sind GMT + 1 Stunde
Seite 1 von 1

 
Gehe zu:  
Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.

 Impressum :: Datenschutz