PDA

Vollständige Version anzeigen : Abhängige Bilder in Form


stevi31_2000
03.10.2002, 12:29
Hallo Zusammen,
möchte in einem Formular Ampelbilder zur Optischen kontrolle anzeigen. Beispiel: Wenn der Wert eines Feldes (im Formular) = 0 ist, soll das Bild 1 angezeigt werden. Wenn der wert 50 ist, soll das Bild2 angeziegt werden und wenn der Wert 100 ist, soll Bild 3 angezeigt werden. Ist das machbar? Wenn ja wie. Es sollte eine Möglichkeit sein, die auch mit berrechnete Felder geht. Danke im voraus. Gruß, stevi

AWSW
03.10.2002, 13:15
Hallo,
meinst Du Bilder oder eine Anzeige verschiedener Farben ?!?

Mit der Farbe eines Rechtecks könnte man das IMHO so machen:

Private Sub Befehl3_Click()
Select Case (Me.Text1)
Case Is <= 5 'Wenn kleiner/gleich 5 dann roter Hintergrund
Me.Rechteck0.BackColor = vbRed
Case Is < 10 'Wenn kleiner 10 dann gelber Hintergrund
Me.Rechteck0.BackColor = vbYellow
Case Is >= 10 'Wenn größer/gleich 10 dann grüner Hintergrund
Me.Rechteck0.BackColor = vbGreen
End Select
End Sub

Die Werte müsstest Du noch an Deine Vorgabe anpassen...

HTH AWSW

AWSW
03.10.2002, 13:46
Hier auch zum Ausprobieren: <a href="http://www.awsw.de/Forum/viewtopic.php?t=458" target="_blank">Titel: Select Case - Methode in VBA</a>

HTH AWSW

Scorefun
03.10.2002, 18:57
Du kannst auch beim Axel mal hier vorbeischauen:

<a href="http://www.awsw.de/Forum/viewtopic.php?t=17&highlight=scorefun" target="_blank">http://www.awsw.de/Forum/viewtopic.php?t=17&highlight=scorefun</a>

Das gleiche Prinzip kannst Du dann auch für Deine drei Ampel-Bilder erweitern, wie z.B. so:

<a href="http://www.scorefun.de.vu/access/ampel.zip" target="_blank">http://www.scorefun.de.vu/access/ampel.zip</a>