Heute möchte Ich euch zeigen wie Mann einfach mit der Microsoft Rich TextBox Arbeiten kann.

[*]Komponente Hinzufügen[*]Nützliche Eigenschaften[*]Texteditor Basteln

1 - Komponente Hinzufügen
Als erstes müssen wir die Komponente Hinzufügen, dafür machen wir Rechtsklick auf unsere Werkzeugsammlung.

Werkzeugsammlung:



und Klicken anschließend auf Komponenten


Dann machen wir noch einen Haken bei "Microsoft Rich TextBox Control 6.0"



Dann Klicken wir auf Übernehmen, und ziehen die Rich Textbox auf unsere Form.


2 - Eigenschaften
So jetzt schauen wir uns doch mal ein paar Eigenschaften der Rich Textbox 6.0 an.

AutoVerbMenu:
Das AutoVerbMenu ist Dieses Menu:




FileName:
Unter FileName könnt ihr Vorgefertigte Texte Laden, der Vorteil daran ist
das Mann die Texte Direkt in die Rich Textbox Laden kann
und z.B. keine "Lizenz.txt" mitliefern müsst.

ScrollBars:
Das sind die scroll Balken die Rechts & Unten sind, wenn der Text zu lang ist
Die Eigenschaft Stellt ihr auf "rtfBoth = 3" <-- das “rtgBoth“ Steht für die Horizontale & Vertikale Scroll Balken

3. - Texteditor Basteln
Als erstes fangen wir mit den Menu Editor an!

Klickt dazu einmal eure Form an, und geht anschließend auf Extras.




Dann kommt dieses Fenster.

Caption: Datei
Text: Datei_code



Jetzt klickt ihr auf "Nächster", und dann auf Diesen Feil

Caption: Speichern
Text: Speichern_code

Jetzt klickt ihr wieder auf "Nächster"
http://img3.imagebanana.com/img/1l1qyyt8/M...chster2.bmp.png




Caption: Laden
Text: Laden_code

jetzt nur noch auf OK und ihr seit mit den Menu Fertig, und das ergebnis ist:
http://img3.imagebanana.com/img/q11cgwqz/menu.bmp.png

CommonDialog Hinzufügen

Werkzeugsammlung:
http://img3.imagebanana.com/img/8wl0ier2/Komponenten.bmp.png

und Klicken anschließend auf Komponenten

Dann machen wir noch einen Haken bei "Microsoft Common Dialog Control 6.0"



Dann Klicken wir auf Übernehmen, und ziehen das Common Dialog auf unsere Form, und Benennen das "CommonDialog1" um in "cdl".

Klickt jetzt auf Speichern
http://img3.imagebanana.com/img/q11cgwqz/menu.bmp.png

und fügt Diesen code ein

Code:
Visual Basic: [code]cdl.FileName = "Textdatei.txt" 'Hier geben wir ein Beispiel Name an!
cdl.ShowSave 'Hier rufen wir das Dialog zum Speichern auf!
Open cdl.FileName For Output As #1 'Hier geben wir den Phad an wo wir die Datei erstellen wollen
Print #1, RichTextBox1.Text 'und Hier schreiben wir das was in der RichtextBox steht in die Datei
Close #1 'Das dürfte jeder wissen[/code]

Klickt jetzt auf Laden und fügt Diesen code ein

Code:
Visual Basic: [code]Dim input_data As String 'Variable Deklarieren
cdl.ShowOpen 'Hier rufen wir das Dialog zum Laden auf!
If cdl.FileName <> "" Then 'Wenn das was du Ausgewählt hast Größer & kleiner als Nichts ist, dann Öffne die datei
Open cdl.FileName For Input As #1 'Hier öffnen wir die Datei die gerade ausgewählt wurde!
RichTextBox1.Text = "" 'Richtextbox Leeren
While Not EOF(1) 'wenn noch nicht am ende der datei
Line Input #1, input_data 'Dann Lies weiter in die Varieable Line_Input ein
RichTextBox1.SelText = input_data & vbCrLf 'Hier wird in Die Richtextbox alles was in Line_input drin Steht eingetragen. _
Das "vbCrLf" ist eine Kombination aus Wagenrücklauf und Zeilenvorschubzeichen
Wend 'wenn alles eingelesen wurde dann geh weiter zu Close #1
Close #1 'Das weis jeder
End If 'Hier wird das if was wir frühin angefangen haben Beendet![/code]

So das war mein erstes Tutorial, Ich hoffe es hat euch gefallen.

Mfg Daniel Igoe