 |
| Top-Quellcodes |
|
|
| Rubriken |
|
|
| Kontakt |
|
|
| Suchen |
|
|
|
|
|
Tipps - Dateien, Text, Ein- und Ausgabe
| FileSplit |
Diese Funktion zerlegt einen vollständigen Dateinamen in seine Bestandteile (Pfad, Name, Extension). zB "C:\Programme" ; "Test" ; "exe"
|
Quellcode |
| Eine Laufschrift in einer Textbox |
Eine einfache Laufschrift (Marquee) ohne API-Funktionen.
|
Quellcode |
| Listbox: Eintrag markieren (MouseOver) |
Markiert automatisch einen Eintrag in einer Listbox, wenn der Cursor über dem Listeneintrag ruht.
QUELLE: Dieser Tipp wurde freundlicherweise von ActiveVBzur Verfügung gestellt!
|
Quellcode |
| Windows-Dialog: Ordner wählen |
Mit der API-Funktion "SHBrowseForFolder" wählen Sie
einen Ordner aus einem Dialogfeld. Das Ergebnis können Sie
beliebig verwenden, zB um dem User die Möglichkeit zu geben,
eine Datei in einem bestimmten Ordner abzuspeichern, oder um
eine Suche ab einem bestimmten Ordner zu beginnen.
|
Quellcode
|
| Drag and Drop mit dem Explorer |
Ganz mit VB-Mitteln wird eine Drag and Drop Operation erzielt.
Dieser Tipp zeigt, wie Sie entweder eine Datei in eine Listbox ziehen (dort wird der Pfad angezeigt) oder die Datei in einer
Textbox öffnen. Dieses Beispiel funktioniert mit Dateien des Typs *.txt .
|
Quellcode |
| Drag and Drop von der Listbox ins Textfeld |
Sie wollen Einträge aus einer Listbox in ein Textfeld ziehen ? Kein Problem mit Drag and Drop-Operationen. Im Gegensatz zum vorigen Beispiel können nur Einträge einer
Listbox der eigenen Anwendung behandelt werden.
|
Quellcode |
|
Verzeichnisse erstellen |
Mit der VB-Funktion 'MkDir' können Sie nur einen Ordner erstellen. Wollen Sie jedoch eine ganze Ordnerstruktur, zB
C:\Programme\NeuesProgramm\Test\Ordner1 erstellen, hilft Ihnen diese Funktion weiter. Sinnvoll für ein eigenes Setup-Programm
und ähnliches.
|
Quellcode |
| Richtextbox - Einfügen / Kopieren / Ausschneiden |
Tipps für die Richtextbox. Behandelt werden das Einfügen, Kopieren und Ausschneiden von Text oder Grafiken und der Umgang mit der Zwischenablage.
|
Quellcode |
| Listbox - Markierte Elemente mit Sendmessage |
In einer Schleife können Sie zwar abfragen, welche Items einer Listbox (Multiselect) denn nun markiert sind. Das kann aber je nach CPU und Größe der Listboxeinträge
dauern. Schneller gehts mit der API-Funktion Sendmessage.
|
Quellcode |
| Listbox - überbreite Einträge |
Oft passiert es, dass die Listbox schmäler ist als der längste Eintrag. Eine Lösungsmöglichkeit wäre per SendMessage einen horizontalen Scrollbalken anzuzeigen. Oder
man verwendet die Tooltips, um bei einem MouseMove-Ereignis über dem betreffenden Eintrag diesen vollständig anzuzeigen.
|
Quellcode |
| Ein Array durchsuchen |
Manchmal stehen Sie vielleicht vor dem Problem, Daten in einem Array durchsuchen zu müssen. Mit der hier gezeigten Funktion, die Sie auch in einem Modul verwenden
können, werden gleich mehrere Datentypen berücksichtigt (Integer, Long, String, Date)
|
Quellcode |
| Zeilenanzahl einer Textbox erfahren |
Es wäre umständlich, alle vbcrlf's zu zählen, um die Anzahl der Zeilen in einer Textbox zu bekommen. Viel einfacher ist die API-Funktion SendMessage mit der
Konstanten EM_GETLLINECOUNT .
|
Quellcode |
| Listenfeld füllen: VB gegen API |
Um eine Liste zu füllen, genügt im Normalfall "List1.AddItem". Handelt es sich um sehr viele Einträge, meist in einer Schleife, empfiehlt sich die API-Funktion
SendMessage.
|
Quellcode |
| Schleifenoptimierung |
Nehmen wir an, Sie haben eine Schleife die 10.000 mal durchlaufen wird, um einen Zähler zu erhöhen. Mit diesem Tipp geht es weitaus schneller !
|
Quellcode |
| Alle Controls entleeren |
Kleiner Tipp, wie Sie Text- List- und Comboboxen auf "Null" stellen.
|
Quellcode |
| Textbox: Nur Großbuchstaben |
Schon während der Eingabe in eine Textbox wird geprüft und umgewandelt. Es werden natürlich nur die Buchtaben von A - Z berücksichtigt, Ziffern und sonstige Zeichen
bleiben unberührt.
|
Quellcode |
| Überprüfen, ob Datei existiert (API) |
Man kann über die VBeigene Funktion "DIR" überprüfen, ob eine bestimmte Datei existiert. Allerdings ist die API-Funktion "OPENFILE" viel zuverlässiger und in eine
eigene Funktion gekapselt, leicht wiederverwendbar.
|
Quellcode |
| Datei suchen (API) |
Es gibt umfangreiche Funktionen zum Durchsuchen von Dateien. Eine finden Sie hier:
Wollen Sie jedoch nur eine einzige Datei finden, bietet sich die folgende Funktion an.
|
Quellcode |
| Ordnerstruktur erstellen |
Eine mögliche (selbstgeschriebene) Funktion habe ich schon vorgestellt (siehe MakeDir)
Noch einfacher und schneller geht es mit einer API-Funktion.
|
Quellcode |
| Notepad fernsteuern |
Mit "SendKeys" ist es ganz einfach, Tastenanschläge an eine fremde Anwendung zu schicken.
In diesem Beispiel wird Notepad gestartet, Text übergeben und gespeichert.
|
Quellcode |
| Dateien vergleichen |
Ein sehr einfaches und geniales Beispiel, wie
man einen Vergleich zweier Dateien realisiert. Es müssen nicht unbedingt
Textdateien sein, es kann sich um alle möglichen Dateiformate handeln. Autor:
Jost Schwider, http://vb-tec.de
|
Quellcode |
| Überschreibemodus in einer Textbox |
Standardmässig hat die Textbox keine Einstellmöglichkeiten, einen Überschreibemodus. Mit diesem Tipp gelingt es aber trotzdem !
|
Quellcode |
| Sind Zahlen in einem Text? |
In einer Schleife kann festgestellt werden, ob in einem Text Zahlen vorhanden sind oder nicht.
|
Quellcode |
| Text während der Eingabe in Großbuchstaben umwandeln |
Meist wird erst nach der Eingabe in eine Textbox ein Text in Großbuchstaben umgewandelt. Mit diesem Tipp wird gezeigt,
wie dies bereits während der Eingabe (Text1.KeyPress) geschieht.
|
Quellcode |
| Listbox links- und rechtsbündig füllen |
Einfach und effektvoll - Idee von
Christoph von Wittich
Eine Listbox kann zwar standardmäßig nur linksbündig ausgerichtet werden, mit
diesem Beispiel gehts aber auch rechtsbündig. Und bei Bedarf auch abwechselnd ;-)
|
Quellcode |
| Listbox rechtsbündig ausrichten |
Idee von
Christoph von Wittich
Eine Listbox wird herkömmlich gefüllt, der Inhalt aber mit einem Schlag
rechtsbündig ausgerichtet.
|
Quellcode |
| Zeilennummern in Dateien schreiben |
Diese Frage tauchte in einem Forum auf...
Wie kann ich eine Datei öffnen und an den Anfang jeder Zeile die Zeilennummer schreiben ?
|
Quellcode |
| Zeilenposition eines gesuchten Strings |
Sie möchten einen Begriff in einer Datei suchen und finden? Kein Problem...
In diesem Beispiel wird aber
auch noch gezeigt, in welcher Zeile der gesuchte Begriff zu finden ist.
|
Quellcode |
| Maximaler Wert in einem Array |
Leider gibt es in VB keine Funktion, die den maximalen Wert in einem Array ausgibt. Also muss das Datenfeld in einer Schleife
durchgegangen werden.
|
Quellcode |
|
|
