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

Mitglied: florengray

florengray (Level 1) - Jetzt verbinden

03.05.2008, aktualisiert 23:27 Uhr, 5658 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
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 ...

Visual Studio

Probleme mit mehrdimensionalen Arrays in VB.NET

gelöst Frage von MarcoBornVisual Studio10 Kommentare

Hallo Forum, ich versuche gerade, in VB.NET ein mehrdimensionales Array zu definieren, dann mit Werten zu füllen und anschließend ...

Neue Wissensbeiträge
Microsoft
ARD-Doku - Das Microsoft Dilemma
Tipp von Knorkator vor 35 MinutenMicrosoft

Hallo zusammen, vor einigen Tagen lief in der ARD u.a. Reportage. Das Youtube Video dazu dürfte länger verfügbar sein. ...

Windows 10

Neue Sicherheitslücke in Windows 10 (Version 1709) durch Google öffentlich geworden

Information von kgborn vor 18 StundenWindows 10

Vor ein paar Tagen haben Googles Sicherheitsforscher vom Projekt Zero eine Sicherheitslücke im Edge-Browser publiziert. Jetzt wurde eine weitere ...

iOS
IOS 11.2.6 verfügbar
Information von sabines vor 1 TagiOS

Mit dem Update soll der Bug behoben werden, bei dem eine bestimmte Zeichenkette IOS zum Absturz gebracht hat.

Sicherheit
Sicherheitsrisiko: Die Krux mit 7-Zip
Information von kgborn vor 1 TagSicherheit8 Kommentare

Bei vielen Anwendern ist das Tool 7-Zip zum Entpacken von Archivdateien im Einsatz. Die Software ist kostenlos und steht ...

Heiß diskutierte Inhalte
Router & Routing
LANCOM VPN CLIENT einrichten
Frage von Finchen961988Router & Routing27 Kommentare

Hallo, ich habe ein Problem und hoffe ihr könnt mir helfen, wir haben einen Kunden der hat einen Speedport ...

Windows Server
AD DS findet Domäne nicht, behebbar?
Frage von schapitzWindows Server25 Kommentare

Guten Tag, ich habe bei einem Kunden ein Problem mit den AD DS. Umgebung ist folgende: Windows Server 2016 ...

LAN, WAN, Wireless
VPN Cisco ASA5505 PaloAlto PA-200
gelöst Frage von YannoschLAN, WAN, Wireless22 Kommentare

Hallo zusammen, ich würde gerne ein Site-to-Site VPN zwischen den beiden Standorten aufbauen. PaloAlto PA200 Internetanschluss Deutsche Telekom GK ...

SAN, NAS, DAS
Qnap TS-453S Pro - Anbindung Active Directory
Frage von JuckieSAN, NAS, DAS13 Kommentare

Hallo zusammen, ich habe hier eine Qnap TS-453S Pro die sich mal so absolut gar nicht in das Active ...