Top-Themen

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Arrays an andere Form übergeben

Frage Entwicklung VB for Applications

Mitglied: florengray

florengray (Level 1) - Jetzt verbinden

03.05.2008, aktualisiert 23:27 Uhr, 5646 Aufrufe, 2 Kommentare

Also neuer Post.
Für andere:
Ich habe in einem Modul1 ganz viele Variablen als Public deklariert, damit andere Funktionen aus meinem Programm darauf zugreifen können.
Darunter auch eine Deklaration:

Public Erw_Bear_Opt_find_mark() As String
Public max_Erw_Bear_Opt_find_mark As Integer

An einer best. Stelle im Programm kann der Benutzer Textsequenzen eingeben, nach denen dann in einem anderen Text gesucht werden soll, und diese werden dann rot markiert. Da ich ja vorher nicht weis, nach wievielen Sequenzen der Benutzer suchen will
habe ich mir gedacht, dass ich die Var als Array gestalten könnte. Dann werden genau so viele Arrays angelegt, wie der Benutzr braucht.

Die Anzahl, wieviele Arrays der Benutzer angelegt hat, wird in max_Erw_Bear_Opt_find_mark gespeichert.
Wenn jetzt die Auswertung in dem Programm ablaufen soll, so sollte das Form dann mit einer For Schleife
die Inhalte der angelegten Arrays abrufen und die dann in die Suche einbauen.

z.B.
for a = 0 To max_Erw_Bear_Opt_find_mark
suche nach Erw_Bear_Opt_find_mark(a)
next a

Aber ich hab ein Problem.
In dem Form, wo der Benutzer die Arrays festlegt, wird das Array per ReDim Preserve Erw_Bear_Opt_find_mark(tmp_4) immer erweitert. Das Dim allerdings begrenzt den Gültigkeitsbereich. Und das ist das Problem.
Und nun frage ich euch, wie man das lösen könnte.

florengray
Mitglied: bastla
03.05.2008 um 21:59 Uhr
Hallo florengray!

Auch wenn Du die von Dir verwendete VB-Version nicht genannt hast, wird sie sicherlich Split() bzw, wenn Du gesteigerten Wert darauf legen solltest, bereits beim Erfassen ein Array zu verwenden, Join() kennen - damit hast Du die Möglichkeit, alle Textsequenzen in einem einfachen String (mit passendem Trennzeichen) zusammenzufassen bzw daraus (wieder) ein Array zu machen ...

Zur Verdeutlichung: Beim Erfassen würde ich einfach die einzelnen Textsequenzen, zB durch "|" (oder ein anderes, ansonsten nicht vorkommendes Zeichen) getrennt, in einen gemeinsamen String packen, etwa:
01.
If Sammelstring <> "" Then 
02.
        Sammelstring = Sammelstring & "|" & TextBox1.Text 
03.
Else 
04.
        Sammelstring = TextBox1.Text 
05.
End If
und danach mit
01.
Erw_Bear_Opt_find_mark = Split(Sammelstring, "|")
das gewünschte Array daraus machen.

Übrigens: Das "Mitzählen" der Array-Elemente erspart Dir die Funktion UBound().

Grüße
bastla
Bitte warten ..
Mitglied: florengray
03.05.2008 um 23:27 Uhr
Hallo, oder besser guten Abend.
Vielen Dank bastla!

1. Habe VB Express 2008
2. Lerne die Sprache gerade. (Genau seit 5 Tagen)
3. Solche Funktionen kenne ich noch nett ist aber genial, dass ich sie jetzt so langsam von auch gezeigt krieg.
4. Herzliches Dankeschön an alle!
5. Gute Nacht an alle

florengray
Bitte warten ..
Ähnliche Inhalte
PHP
Aus Arrays neue Arrays erzeugen!
gelöst Frage von FunkerVogtPHP8 Kommentare

Hallo Gemeinde, ich hoffe Ihr könnt mir bei meiner Problematik helfen und meinen kleinen gordischen Knoten im Kopf lösen. ...

Visual Studio
Verschachtelte Arrays
gelöst Frage von MarcoBornVisual Studio19 Kommentare

Hallo Forum, ich habe in VB.NET 6 Arrays, die alle dieselbe Länge, aber unterschiedliche Datentypen haben. Array1 ist vom ...

Windows Server
Arrays vergleichen mit Powershell
gelöst Frage von SlainteMhathWindows Server5 Kommentare

Moin, ich sitze hier vor einen Problem mit Powershell, das mich schier wahnsinnig macht. Hintergrund: Die auf einem Windows ...

Visual Studio
WPF Form in Windows Forms Multi Document Interface
Frage von Herbrich19Visual Studio11 Kommentare

Hallo, Ich würde gerne eine WPF Form in eine Windows Forms Anwendung einbauen. Diese soll in einen Multi Document ...

Neue Wissensbeiträge
Viren und Trojaner

Deaktivierter Keylogger in HP Notebooks entdeckt

Information von bitcoin vor 19 StundenViren und Trojaner1 Kommentar

Ein Grund mehr warum man Vorinstallationen der Hersteller immer blank bügeln sollte Der deaktivierte Keylogger findet sich im vorinstallierten ...

Router & Routing

Lets Encrypt kommt auf die FritzBox

Information von bitcoin vor 23 StundenRouter & Routing

In der neuesten Labor-Version der FB7490 integriert AVM unter anderem einen Let's Encrypt Client für Zugriffe auf das Webinterface ...

Internet

Was nützt HTTPS, wenn es auch von Phishing Web-Seiten genutzt wird

Information von Penny.Cilin vor 3 TagenInternet17 Kommentare

HTTPS richtig einschätzen Ob man eine Webseite via HTTPS aufruft, zeigt ein Schloss neben der Adresse im Webbrowser an. ...

Webbrowser

Bugfix für Firefox Quantum released - Installation erfolgt teilweise nicht automatisch!

Erfahrungsbericht von Volchy vor 5 TagenWebbrowser8 Kommentare

Hallo zusammen, gem. dem Artike von heise online wurde mit VersionFirefox 57.0.1 sicherheitsrelevante Bugs behoben. Entgegen der aktuellen Veröffentlichung ...

Heiß diskutierte Inhalte
Batch & Shell
Trusted Sites für alle User auf dem PC einpflegen
Frage von xXTaKuZaXxBatch & Shell12 Kommentare

Aufgabestellung: Es sollen auf 1 PC (bzw. mehreren PCs) vertrauenswürdige Sites per Powershell eingetragen werden, die für alle User ...

Voice over IP
Telefonstörung - Ortsrufnummern kein Verbindungsaufbau
Frage von Windows10GegnerVoice over IP10 Kommentare

Hallo, sowohl bei uns als auch beim Opa ist es über VoIP nicht möglich Ortsrufnummern anzurufen. Es kommt nach ...

Vmware
DOS 6.22 in VMWare mit CD-ROM
gelöst Frage von hesperVmware10 Kommentare

Hallo zusammen! Ich hab ein saublödes Problem. Es ist eine VMWare mit DOS 6.22 zu erstellen auf dem ein ...

Windows 10
Probleme mit Dateien, deren Pfad + Dateiname länger als 256 Zeichen sind
Frage von FalaffelWindows 109 Kommentare

Guten Tag, unter Windows 10 scheint es immer noch das Problem zu geben, dass der Pfad + Dateiname einer ...