Textbox Teil suchen & kopieren

Timtim · 8. Januar 2011, 23:30

Hey,

Wie schaffe ich es das VB mir aus Textbox1 einen bestimmten Teil z.b.

1
2
3
4
5
6

Raussucht und mir nur diese Zeilen kopiert?

Viele Grüße

Mangafreak1995 · 9. Januar 2011, 00:10

SelectionStart, SelectionLength, SelectedText sollten dir helfen

ansonsten würde ich wenn ein bestimmtes Muster besteht dir RegEx empfehlen

Timtim · 9. Januar 2011, 00:13

Also...
Ich muss erst aus einem ca. 100 Zeilen langen Text das wort XYZQ suchen...
Dann die Zeile markieren und in textbox2 kopieren...
Wie mache ich DAS?

headnut99 · 9. Januar 2011, 00:37

Von der Logik her Eig. einfach.

Jede zeile einzelnt durchgehen und den string einfach mit "String.cotains("XYZ"), durchsuchen...

VB.NET-Quellcode

dim text as String = textbox1.text
dim zeilen() as String = Textbox1.Text.Split(Environment.NewLine)
for i as integer = 0 to zeilen.length
if zeile(i).contains("XYZ") then
msgbox("Zeile " & i & " enhält " & XYZ & ".")
end if
next

mfg

Timtim · 9. Januar 2011, 00:44

Danke Head

Aber wie habe ich nun zeile zu deklarieren?

headnut99 · 9. Januar 2011, 01:02

oh sry

Hab das nicht im editor geschrieben das ist nen Tippfehler

VB.NET-Quellcode

dim text as String = textbox1.text
dim zeile() as String = Textbox1.Text.Split(Environment.NewLine)
for i as integer = 0 to zeilen.length
if zeile(i).contains("XYZ") then
msgbox("Zeile " & i & " enhält " & XYZ & ".")
end if
next

so soll das sein

Timtim · 9. Januar 2011, 11:25

Hey,

So habe ich es auch schon probiert aber
dann ist zeilen undeklariert

Mangafreak1995 · 9. Januar 2011, 11:40

änder zeilen.Length in zeile.Length

Timtim · 9. Januar 2011, 12:36

Bekomme nun diesen error von VB

Der Index war außerhalb des Arraybereichs.

TypeOf · 9. Januar 2011, 12:58

VB.NET-Quellcode

For i As Integer = 0 to zeile.Lenght - 1
' ...
Next

Übrigens kommt bei der MessageBox nicht die richtige Zeilennummer, die richtige Zeilennummer bekommt man mit i + 1.

Timtim · 9. Januar 2011, 13:10

"Lenght" ist kein Member von "System.Array"

EiPott · 9. Januar 2011, 13:14

Count oder GetUpperBound(0).

Timtim · 9. Januar 2011, 13:19

Wie habe ich das zu verwenden?

EiPott · 9. Januar 2011, 13:21

deinArray.GetUpperBound(0) bzw. .Count.

headnut99 · 9. Januar 2011, 13:33

Ja mit Indices hat ich es noch nie

.length ist wohl(so ohne editor) aus vb 6.0 zeiten während meines Praktikums "über" gegeblieben. Tut mir Sorry

Mfg

Timtim · 9. Januar 2011, 13:40

EiPott schrieb:

Count oder GetUpperBound(0).

Aber das hilft mir doch bei dem Fehler nicht weiter oder?

EiPott · 9. Januar 2011, 13:54

Doch!
Ersetze Length - 1 durch z. B. Count - 1.

Timtim · 9. Januar 2011, 14:01

Egal was ich eingebe...
Das Programm sagt immer das der gesuchte Text in Zeile 0 steht :huh:

Mangafreak1995 · 9. Januar 2011, 14:28

Timtim schrieb:

"Lenght" ist kein Member von "System.Array"

es heißt Length

Dachir · 9. Januar 2011, 14:28

hmmm also wenn ich dich richtig verstanden habe soll das Programm nicht nur das word sondern auch den rest der zeile kopieren?
Okay die zeile bekommt man hiermit markiert:

VB.NET-Quellcode

If TextBox1.Text.Contains("zielwort") Then
Dim Line As String
Line = TextBox1.GetLineFromCharIndex(TextBox1.SelectionStart)
Textbox2.Text = Line
End if

Jetzt muss man irgendwie die Linie kopieren

Textbox Teil suchen & kopieren

Textbox Teil suchen & kopieren

VB.NET-Quellcode

VB.NET-Quellcode

VB.NET-Quellcode

EiPott schrieb:

Timtim schrieb:

VB.NET-Quellcode

Ähnliche Themen

3 Benutzer haben hier geschrieben