vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Schützen Sie Ihre Software vor Software-Piraterie - mit sevLock 1.0 DLL!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2024
 
zurück

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

Fortgeschrittene Programmierung
Code verbessern ? - Hilfe gesucht ! 
Autor: JBL
Datum: 11.01.11 14:39

hallo,


ich habe ein kleines Programm welches als Input
i1,i2,i3,i4,i5,i6,i7
hat und nur solche Input Reihen wieder als print ausgibt, die
eine der Bedingungen erfüllt.

Die Bedingung/Filter schaut so aus:

'Erster 3er-Kombi-Filter 1-2-3

flag1 = 0
If i1 = 1 Or i1 = 2 Or i1 = 3 Then flag1 = flag1 + 1
If i2 = 1 Or i2 = 2 Or i2 = 3 Then flag1 = flag1 + 1
If i3 = 1 Or i3 = 2 Or i3 = 3 Then flag1 = flag1 + 1
If i4 = 1 Or i4 = 2 Or i4 = 3 Then flag1 = flag1 + 1
If i5 = 1 Or i5 = 2 Or i5 = 3 Then flag1 = flag1 + 1
If i6 = 1 Or i6 = 2 Or i6 = 3 Then flag1 = flag1 + 1
If i7 = 1 Or i7 = 2 Or i7 = 3 Then flag1 = flag1 + 1
If flag1 = 3 Then Print #1, i1,i2,i3,i4,i5,i6,i7


Das funktioniert soweit auch alles wenn dies nur ein Filter ist.

Ich habe aber nun ca. 150 dieser "3er-Kombi-Filter" immer mit unterschiedlichen drei Zahlen

Wie könnte ich das vereinfachen/aufbauen, das ich nicht ca. 150 x den obigen Block
mit 3 Zahlen bestücken/schreiben muss ??????????

danke vorab

LG
Angelina
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Code verbessern ? - Hilfe gesucht !1.417JBL11.01.11 14:39
Re: Code verbessern ? - Hilfe gesucht !910Blackbox11.01.11 17:56
Re: Code verbessern ? - Hilfe gesucht !887JBL11.01.11 18:13
Re: Code verbessern ? - Hilfe gesucht !878wb-soft11.01.11 19:06
Re: Code verbessern ? - Hilfe gesucht !895JBL11.01.11 19:18
Re: Code verbessern ? - Hilfe gesucht !920wb-soft11.01.11 19:22
Re: Code verbessern ? - Hilfe gesucht !1.004JBL11.01.11 19:27
Re: Code verbessern ? - Hilfe gesucht !856sudave12.01.11 11:04
Re: Code verbessern ? - Hilfe gesucht !829wb-soft12.01.11 11:28
Re: Code verbessern ? - Hilfe gesucht !798Mad_One20.01.11 09:13

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-2024 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