| |

Allgemeine DiskussionenRe: Listbox textBox problem | |  | Autor: spiderboy | Datum: 28.03.05 23:31 |
| Ich hab nach langem überlegen folgendes programmiert
Private Sub Form_Load()
'hier der code wie die Text-Datei geladen wird
'und nun mein code:
Form1.lDeutsch.AddItem (Left(sLine, InStr(1, sLine, "=") - 1))
Form1.lEnglisch.AddItem Mid(sLine, InStr(1, sLine, "=", vbBinaryCompare) + 1)
End Sub Musste echt lange überlegen um es hinzukriegen.
Da wie schon gesagt ich noch Form2 mit txtSuch und txtIst hab, brauche ich noch ein Code (da weiss ich nicht mal wo ich anfangen soll).
Ich schreibe mal nochmal was ich will:
Wenn der User auf ein Eintrag in der ListBox lEnglisch doppel klickt, dann soll Form2 geladen werden und txtIst mit den englischem Begriff (z. B.: go) und txtSuch (dann gehen) gefüllt werden.
Damit das auch geht, habe ich in den Code oben noch was eingefügt:
Private Sub Form_Load()
'hier der code wie die Text-Datei geladen wird
'und nun mein code:
Form1.lDeutsch.AddItem (Left(sLine, InStr(1, sLine, "=") - 1))
Form1.lEnglisch.AddItem Mid(sLine, InStr(1, sLine, "=", vbBinaryCompare) + 1)
'das hier:
'sLine ist eine Variable, die die einzelnen Zeilen aus der Datei Deu.txt enthält
Form1.List1.AddItem sLine
End SubJetzt muss der englische Wert mit dem aus der List1 also verglichen werden, hier:
ListBox - Eintrag:
gehen=go
lesen=read
....
Da in diesem Bsp. jetzt das englische Wort go ist soll nach go gesucht werden und das dazu gehörige Wort. Mt diesen Werten soll dann ja txtIst und txtSuch gefüllt werden (siehe auch oben) und für das ganze such ich ein Code.
Ist echt wichtig, bitte helft mir (es soll wenn es geht nicht zu kompliziert sein also mit zu vielen Variablen und so).
Danke Im Voraus
Mfg
spiderboy |  |
 | 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 |
  |
|
vb@rchiv CD Vol.6 vb@rchiv Vol.6
Geballtes Wissen aus mehr als 8 Jahren vb@rchiv!
Online-Update-Funktion Entwickler-Vollversionen u.v.m.Jetzt zugreifen Tipp des Monats Oktober 2025 Matthias KozlowskiUmlaute konvertierenErsetzt die Umlaute in einer Zeichenkette durch die entsprechenden Doppelbuchstaben (aus ä wird ae, usw.) TOP! Unser Nr. 1 
Neu! sevDataGrid 3.0
Mehrspaltige Listen, mit oder ohne DB-Anbindung. Autom. Sortierung, Editieren von Spalteninhalten oder das interaktive Hinzufügen von Datenzeilen sind ebenso möglich wie das Erstellen eines Web-Reports. Weitere Infos
|
|
|
Copyright ©2000-2025 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
|
|