vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
sevDataGrid - Gönnen Sie Ihrem SQL-Kommando diesen krönenden Abschluß!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Visual-Basic Einsteiger
Re: Deutsch-Programm VB 6 
Autor: fin
Datum: 30.05.09 15:11

hallo workuhol,
dein Ansatz interessiert mich, so kannst du Leseverständnis für Texte trainieren. Mein Vorschlag als grobes Muster:
1 Richtextbox zum Laden der Textdatei
3 Commandbutton, 1 Listbox

Private Sub cmdLaden_Click() 'Textdatei laden
rtf.LoadFile "C:\....txt" ' pfad deiner Textdatei
End Sub

Private Sub cmdRemove_Click()' markiertes Wort >> Listbox
Dim a As String
a = rtf.SelText
List1.AddItem a
rtf.SelRTF = ""' wort ist aus RTF-Box entfernt
End Sub
' deine Tochter muss zum Einfügen die Maus zunächst an die Textstelle in der RTF-Box setzen
Private Sub cmdPaste_Click()' Selektierter Eintrag in Listbox >> RTF-Box
rtf.SelText = ""
rtf.SelText = Chr(32) & List1.List(List1.ListIndex) & Chr(32)
List1.RemoveItem (List1.ListIndex)' Eintrag gleich aus listbox entfernen
End Sub

Private Sub List1_DblClick()' oder auf Doppelklick in Listbox
Cmdpaste_Click
End Sub

vielleicht kannst du damit was anfangen, erholsame feiertage
gr. fin
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Deutsch-Programm VB 6809workuhol30.05.09 03:43
Re: Deutsch-Programm VB 6482fin30.05.09 15:11
Re: Deutsch-Programm VB 6466workuhol30.05.09 19:14

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

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

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