Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Wordbasic: Listbox automatisch aktualisieren

38 views
Skip to first unread message

rainer

unread,
Apr 10, 2003, 7:45:37 AM4/10/03
to
Hallo zusammen,
ich möchte ein Listenfeld automatisch aktualisieren lassen.
Der Anwender sieht auf dem Bildschirm eine Maske, die unter
anderem folgendes Listenfeld aufzeigt:
...
WordBasic.ListBox 236, 52, 575, 276, datname(), "datname"
...

gefüllt wird dieses Feld ( datname() ) mit Dateinamen aus
einem bestimmten Verzeichnis. Dieses Verzeichnis wird
ständig aktualisiert,
d.h. es kommen immer mehr Dateinamen hinzu.
Zur Zeit habe ich das Aktualisieren so realisiert, dass der
Anwender einen Button klicken muss und damit das Feld
refreshed.

....
WordBasic.SortArray datname(), (), 0
WordBasic.DlgListBoxArray "datname", datname()


Diesen Button möchte ich einsparen. Die Aktualisierung soll
nach einem bestimmten Zeitintervall (ca. 60 sec)
automatisch erfolgen.
Wer weiss in diesem Fall einen Rat, vielen Dank für die
Mitwirkung

Rainer Betz

Lutz Gentkow

unread,
Apr 10, 2003, 8:00:07 AM4/10/03
to
Hallo Rainer,

bei WordBasic waren die Möglichkeiten noch arg beschränkt, das einzige,
was mir einfällt, ist die OnTime()-Funktion.

Viele Grüße vom Niederrhein

Lutz, MVP für Word/VBA

rainer

unread,
Apr 10, 2003, 10:02:07 AM4/10/03
to
Hallo Lutz,
vielen Dank für die flotte Antwort. Da ich nur wenig
Erfahrungen mit WB habe, kannst Du mir vielleicht auch ein
Beispiel bringen? Vielen Dank!
viele Grüße von der Isar
Rainer
>-----Originalnachricht-----
>.
>

Lutz Gentkow

unread,
Apr 10, 2003, 10:06:15 AM4/10/03
to
Hallo Rainer,

besteht keine Möglichkeit, mit VBA zu arbeiten? In diesem Fall findest
Du unter http://groups.google.com/advanced_group_search reichlich
Beispiel zu der Timer-Funktion, wenn Du als Newsgroup
microsoft.public.de.word.vba angibst.

Die OnTime-Funktion sollte eigentlich ausreichend in der Onlinehilfe
beschrieben sein, ich hab hier leider kein altes Word mehr.

0 new messages