vb@rchiv · Diskussionsforen · Einfache Sache ?

VB Classic
VB.NET
ADO.NET
VBA
C#

Brandneu! sevEingabe v3.0 - Das Eingabecontrol der Superlative!

HOME WORKSHOPS TIPPS & TRICKS BEFEHLSREFERENZ API-REFERENZ FAQ

··· FORUM

Forenübersicht Suchen Forumsregeln

Allgemeine Foren

Allgemeine Fragen Fragen zur vb@rchiv CD Tipps & Workshops Suche VB Code

VB.NET, C#

Ein-/Umsteiger Fortgeschrittene ADO.NET/Datenbanken ASP.NET/WebServices C# Ecke

VB Classic 5/6, VBA

Einsteiger Fortgeschrittene ActiveX Datenbanken Windows API VB Skript (VBS)

Sonderforen

sev-Komponenten Jobs Suche/Gesuche Projekte & Betatester

DOWNLOAD TOOLBESPRECHUNG BÜCHERECKE MARKETPLACE GRAFIK & DESIGN VB-SEITEN

[427 User online]
[418 im Forum]

Partnerseiten
Top 5 Partnerlinks

Weitere...

Entwickler / Welt

··· Diskussionsforen · Visual-Basic Einsteiger

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

Visual-Basic Einsteiger

Einfache Sache ?

Autor: vbspec
Datum: 21.10.04 16:21

Hallo, ich versuche eine Diode nachzubilden ( HDD Diode etc) ich habe eine Shape die über Global Const die farbe wechseln kann Global Const DIODE_OFF = &H4000& Global Const DIODE_ON = &HFF00& Global Const DIODE_ERR = &HFF& Global Const DIODE_ONLINE = 4 Global Const DIODE_HTTPrx = 1 Global Const DIODE_HTTPtx = 2 Global Const DIODE_ONLINEtx = 3 dazu dann noch Timer der die abschaltet eben so : ShapeDiode(diode).FillColor = DIODE_OFF tmrDiode.Enabled = False interval habe ich auf 600 erst eingestellt aufrufen tue ich es über : Sub DiodeBlink(diode As Integer) ShapeDiode(diode).FillColor = DIODE_ON 'RGB(0, 255, 0) tmrDiode.Enabled = True End Sub Leider funktioniert das nicht so wie ich es gewollt habe soll alles automatisch geschen z.b wie bei Netzwerk bildchen bei windows xp geht das ? bloß ohne bildchen ? array ?? wo soll ich anfangen ? vielen dank im vorraus

alle Nachrichten anzeigen

Gesamtübersicht | Zum Thema | Suchen

Thema

Views

Autor

Datum

Einfache Sache ?	589	vbspec	21.10.04 16:21
Re: Einfache Sache ?	309	teccer	22.10.04 07:47
Re: Einfache Sache ?	264	vbspec	22.10.04 12:56
Re: Einfache Sache ?	240	teccer	22.10.04 13:48
Re: Einfache Sache ?	262	vbspec	22.10.04 14:24
lach - Ohne Text	284	teccer	22.10.04 15:06

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übersicht Suchen

Neu! sevCoolbar 3.0

Professionelle Toolbars im modernen Design!
Mit sevCoolbar erstellen Sie in wenigen Minuten ansprechende und moderne Toolbars und passen diese optimal an das Layout Ihrer Anwendung an (inkl. große Symbolbibliothek) - für VB und MS-Access

Weitere Infos

Tipp des Monats

November 2025
Heinz Prelle

Datei-Mehrfachauswahl an eine ListBox übergeben

Dieser Tipp zeigt, wie Sie über den Windows-CommonDialog eine Mehrfach-Dateiauswal realisieren...

Details

Access-Tools Vol.1

Über 400 MByte Inhalt
Mehr als 250 Access-Beispiele, 25 Add-Ins und ActiveX-Komponenten, 16 VB-Projekt inkl. Source, mehr als 320 Tipps & Tricks für Access und VB

Nur 24,95 EUR
Weitere Infos

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