So funktioniert JustAnswer:

  • Fragen Sie einen Experten
    Tausende Experten in über 200 Kategorien.
  • Erhalten Sie eine professionelle Antwort
    Per E-Mail oder sofortiger Benachrichtigung, während Sie auf unserer Website warten.
    Stellen Sie ggf. weitere Anschlussfragen.
  • 100%ige Zufriedenheit garantiert
    Bewerten Sie die erhaltene Antwort.

Stellen Sie Ihre Frage an MKruse.

MKruse
MKruse, Dipl. Inform.
Kategorie: Allgemein
Zufriedene Kunden: 25
Erfahrung:  9 Jahre Erfahrung mit Java, VBA, Perl, C# und C++.
39215291
Geben Sie Ihre Frage in der Kategorie Programmierung hier ein
MKruse ist jetzt online.

Hallo! Nun m chte ich in den Code nicht nur eine Listbox

Kundenfrage

Hallo!

Nun möchte ich in den Code nicht nur eine Listbox und eine Optiongroup einbauen, sondern jeweils mehrere: ca. 3 Listboxen und 12 Optiongroups, um dann wieder zu filtern. Mit der Lösung aus der letzten Frage, müsste ich nach meinem Verständnis dann alle möglichen Kombinationen einzeln codieren: entsprechend 225 Varianten?!?
Gibt es hier eine schlankere Umsetzung?
oder wie würde die bestmögliche Lösung aussehen?

Dank und Gruss
CH
Gepostet: vor 6 Jahren.
Kategorie: Programmierung
Experte:  MKruse hat geantwortet vor 6 Jahren.
Hallo nochmal,

also ich empfehle jetzt den Einsatz einzelner Prozeduren. Für Listboxen gäbs auch die Möglichkeit eine Prozedur für alle zu schreiben. Bei Optiongroups müsste ich mir was überlegen. Ist es ihnen möglich mir ihr Projekt zukommen zu lassen? Z.B. als passwortgeschützte, gezippte Datei auf einer Webseite? Dann könnte ich mal etwas ausprobieren, was dann den Wartungsaufwand in Grenzen halten würde.
Wenn Wartung kein Thema ist, weil sich mit hoher Wahrscheinlichkeit nichts oder nur wenig verändert, dann können Sie folgendes machen (wahrscheinlich auch insgesamt besser, wie mir grade auffällt):

Für eine Listbox passen Sie den Code so an, dass strMarket (bzw. strListbox2) nach dem End If noch folgende Zeile erhält: strMarket = "[Market] " & strMarket
Der Code für die erste Listbox kann dann einfach kopiert werden. Für alle folgenden Felder müsste dann noch ein AND angefügt werden. Also: strListBox2 = " AND [ListBoxField2] " & strListBox2

Bei der OptionGroup müsste dann ein strOptGroup1 = "", falls keine Auswahl vorliegt, bzw strOptGroup = " AND [OptGroup1Field] " & strOptGroup, falls eine Auswahl vorliegt. Der Code für die OptionGroups müsste dann auch für jede kopiert werden.

Ganz am Schluss würde dann der condition-String zusammengebaut werden in der art:
strFilter=strListBox1 & strListBox2 & strListBox3 & strOptGroup1 .... & strOptGroup13

Der Nachteil für jede Optiongroup den Code zu kopieren liegt auf der Hand. Ändert sich etwas, so müssen mehrere Stellen angepasst werden. Daher wäre es besser Prozeduren zu verwenden, aber da müsste ich mir noch etwas überlegen, um die einzelnen Auswahlmöglichkeiten der OptionGroups auf ihre Datenbank-werte zu mappen. Das würde ich gerne erstmal ausprobieren.

Leider hätte ich dafür erst heute abend Zeit (oder morgen früh). Also wenn Sie eine gut wartbare Version bevorzugen, würde meine Antwort etwas dauern. Tut mir leid.

MfG
M Kruse
Kunde: hat geantwortet vor 6 Jahren.
Hallo again!

Vielen Dank für die Vorschläge! Werde Ihre obige Lösung probieren. Unabhängig davon könnte ich Ihnen das Projekt gerne zur Verfügung stellen. Da es sich noch im "Bastel" Zustand befindet, sind auch keine sensitiven Daten enthalten, aber genügend Daten zum Testen. Web-page habe ich leider keine, daher bliebe vermutlich nur email!?

Gruss und danke
CH
Experte:  MKruse hat geantwortet vor 6 Jahren.
Hallo,

ok. Meine Email lautet kruse(at)uni-bonn.de
Ich schaue dann, dass ich parallel zu ihnen so schnell wie möglich eine intelligente Lösung finde.

MfG
M Kruse

Bekannt aus:

 
 
 
„[...]mehr als Zehntausend Experten weltweit; 1500 davon in Deutschland. Acht Jahre nach dem Start ist das [...] Online-Unternehmen mit seinen 90 Mitarbeitern die größte Web-Seite für das Vermitteln von Experten von Anwälten über Ärzte bis hin zu Universitätsprofessoren.“
„Wer eine fachmänische Lösung für ein medizinisches, rechtliches oder technisches Problem sucht, kann das jetzt auch im Internet tun. Lebenshilfe auf die schnelle, unkomplizierte und vor allem erschwingliche Art bietet die Seite www.justanswer.de. Etwa 1500 Experten stehen per Mail für Fragen zu ca. 200 Fachgebieten rund um die Uhr zur Verfügung."
„Rat gewünscht? Rechtliche, medizinische oder allgemeine Fragen beantworten Experten unter www.justanswer.de."
„JustAnswer, die weltweit führende Online-Plattform für Expertenfragen und -antworten, bietet ab sofort noch mehr Sicherheit und Qualität für Verbraucher."
„Ob Vorbereitung, Notfall oder Reklamation nach dem Urlaub - JustAnswer bietet jederzeit schnelle, kompetente Antworten"
„Die Online-Plattform JustAnswer bringt Ratsuchende und Experten in über 200 Fachgebieten zusammen."
 
 
 

Was unsere Besucher über uns sagen:

 
 
 
  • Sehr schnelle und kompetente Antwort, die für mich bares Geld bedeutet. Vielen Dank! S.Stober K.
< Zurück | Weiter >
  • Sehr schnelle und kompetente Antwort, die für mich bares Geld bedeutet. Vielen Dank! S.Stober K.
  • Herzlichen Dank! Hab durch Ihre Antwort viel Geld gespart! Ben R. Deutschland
  • Sehr schnelle und kompetente Hilfestellung. Besonders für mich als Laien wurde alles sehr verständlich erklärt. Gerne wieder! Rosengl Bad Tölz
  • Vielen Dank für die schnelle und gute Beratung. Sie haben uns gut weitergeholfen. Wir kommen gerne wieder auf Sie zu. Birgit H. Kempten
  • Hervorragende und außerordentlich liebenswürdige Hilfe! Ich werde bei Bedarf bestimmt wieder auf JustAnswer zurückgreifen und bin sehr dankbar, dass es so etwas gibt! Dr. Gert Richter Verl
  • Danke für die schnelle Hilfe. Sehr schön, auch an einem Sonnabend ist jemand zu erreichen. Janine Gaus Bielfeld
  • Für mich persönlich war die Antwort sehr hilfreich. Vielen Dank an den Experten! Daniela H. Dortmund
 
 
 

Lernen Sie unsere Experten kennen:

 
 
 
  • RASchiessl

    RASchiessl

    Rechtsanwalt

    Zufriedene Kunden:

    9743
    Vertragsanwalt des Bayerischen Wohnungs- und Grundeigentümerverbandes Regensburg
< Zurück | Weiter >
  • http://ww2.justanswer.com/uploads/CH/chiessl/2015-7-17_7493_resizedimage.64x64.jpg Avatar von RASchiessl

    RASchiessl

    Rechtsanwalt

    Zufriedene Kunden:

    9743
    Vertragsanwalt des Bayerischen Wohnungs- und Grundeigentümerverbandes Regensburg
  • http://ww2.justanswer.com/uploads/RE/rechtso/2011-4-16_115947_P10100052.64x64.JPG Avatar von ra-huettemann

    ra-huettemann

    Rechtsanwalt

    Zufriedene Kunden:

    11676
    Staatsexamen Zulassung als Rechtsanwalt
  • http://ww2.justanswer.com/uploads/raschwerin/2009-12-08_112115_RA_Steffan_-_neu_Large.jpg Avatar von raschwerin

    raschwerin

    Rechtsanwalt

    Zufriedene Kunden:

    8542
    Rechtsanwalt
  • http://ww2.justanswer.com/uploads/TR/troesemeier/2012-8-30_105621_IMG4178.64x64.JPG Avatar von Tobias Rösemeier

    Tobias Rösemeier

    Rechtsanwalt

    Zufriedene Kunden:

    7167
    seit 1995 als selbständiger Rechsanwalt tätig.
  • http://ww2.justanswer.com/uploads/PR/Prof.Nettelmann/2012-4-12_9146_Prof.AchimNettelmann2.64x64.jpg Avatar von Prof.Nettelmann

    Prof.Nettelmann

    Steuerberater

    Zufriedene Kunden:

    3736
    HochschullehrerSteuerberaterDipl.-Kfm.
  • http://ww2.justanswer.com/uploads/SC/schraubendreher/2012-9-27_152628_1.64x64.jpg Avatar von Schraubendreher

    Schraubendreher

    Kfz-Mechaniker

    Zufriedene Kunden:

    2174
    abg. Ausbildung. Freie Werkstatt. Typen offen. Diganose aller Fabrikate, besonders BMW
 
 
 

Ähnliche Fragen in der Kategorie Programmierung