vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
vb@rchiv Offline-Reader - exklusiv auf der vb@rchiv CD Vol.4  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2024
 
zurück

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

Visual-Basic Einsteiger
Re: Umwandlung einer Dezimalzahl als 7 Segment-Anzeige VB 6 
Autor: Zardoz
Datum: 03.05.07 11:22

Hi AK88,
am Einfachsten ist die Verwendung einer LCD-Schriftart:
http://www.dafont.com/theme.php?cat=302&page=1
Du kannst aber auch, binär codieren, welches Segment bei welcher Ziffer
eingeschaltet wird:
Private Sub SetLCD(Ziffer%)
  Dim i%, Wert%
 
  Wert = Choose(Ziffer + 1, 63, 6, 91, 79, 102, 109, 125, 39, 127, 111)
  For i = 0 To 6
    Line1(i).Visible = (Wert And (2 ^ i)) > 0
  Next i
End Sub
Line-Controls im Uhrzeigersinn, oben beginnend, durchnummeriert.

Gruss,

Zardoz

alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Umwandlung einer Dezimalzahl als 7 Segment-Anzeige VB 61.989AK8802.05.07 09:17
Re: Umwandlung einer Dezimalzahl als 7 Segment-Anzeige VB 61.633Zardoz03.05.07 11:22
Re: Umwandlung einer Dezimalzahl als 7 Segment-Anzeige VB 6969AK8803.05.07 22:44
Re: Umwandlung einer Dezimalzahl als 7 Segment-Anzeige VB 61.263AK8807.05.07 09:34

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-2024 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