vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
 Top-Preis! AP-Access-Tools-CD Volume 1  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Visual-Basic Einsteiger
Re: Arrays durchnummerieren 
Autor: Tagedieb
Datum: 09.04.06 18:43
Hallo Holger,
danke für Deine Antwort.
Ich will versuchen das Problem deutlicher zu beschreiben.
Ich möchte in einem Array Persondaten speichern.
z.B.

Person(12000,3)
Person(0,0) = Name
Person(0,1) = Geburtsmonat
Person(0,2) = Geburtsjahr
Person(0,3) = Beruf
usw

Wenn ich alle Personen auslesen will, die im Mai geboren sind
nutze ich im Moment folgende Prozedur: 
For i = o to 12000
	if person(i,1) = 05 then
		combo1.additem person(i,0)
	end if
next i
(es werden alle ausgelesen, die im Mai geboren sind und die Namen (Person(i,0) in combo1 aufgelistet.

So weit so gut, das funktioniert auch recht gut.
Aber es wäre doch ganz sicher schneller, wenn ich von vornherein alle Personen die im Mai geboren sind einlesen könnte (ohne 'if - then') Und dazu würde ich gern je ein Array für Jan, Febr usw haben. Dann sähe das Auslesen so aus:

Kalender steht auf Mai 
For i = 0 to 1000
     	combo1.additem personMai(i,0)
next i
Kalender steht auf Januar 
For i = 0 to 1000
     	combo1.additem personJanuar(i,0)
next i
Wobei der Monat eben eine Variable sein soll, weil ja nicht vorher bekannt ist, auf welchem Monat der Kalender steht.

In einem Array, das alle Personen beinhaltet, sind z.B. 12000 Personen gespeichert .
in einem Array, das nur jene Personen beinhaltet, die im Mai geboren sind, sind ungefähr (statistisch) 1000 Personen gespeichert.

Natürlich könnte ich mit select case den Monat abfragen 
Select case Monat
    	case 05
           	For i = 0 to 1000
                      combo1.additem personMai(i,0)
               	next i
end select
Aber das macht es auch nicht viel einfacher. Am elegantesten wäre 
For i = 0 to 1000
          	combo1.additem personMonat(i,0)
     	  next i
Mit dem Einrücken hat's nicht ganz geklappt,. aber ich hoffe es ist trotzdem verständlich.
Gruß Thomas
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Arrays durchnummerieren681Tagedieb09.04.06 16:21
Re: Arrays durchnummerieren580Holli09.04.06 16:38
Re: Arrays durchnummerieren400Tagedieb09.04.06 18:43
Re: Arrays durchnummerieren364Holli09.04.06 20:09
Re: Arrays durchnummerieren393Tagedieb09.04.06 20:19
Re: Arrays durchnummerieren377Tagedieb09.04.06 21:30
Re: Arrays durchnummerieren378Tagedieb09.04.06 21:32
Re: Arrays durchnummerieren340Holli10.04.06 08:01

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
  
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows 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.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel