PDA

Vollständige Version anzeigen : Werte Berechnen und ausgeben in einem Textfeld?


andreas_a
08.01.2002, 15:21
Hallo zusammen, heute bin ich glaub auf dem fragenden :-)

Also folgendes Problem,
Ich habe 2 Textfelder in dem einten Textfeld wird der CHF ausgelesen wo auch in einer Tabelle vorhanden ist, im 2ten Textfeld sollte es mir eine Umrechnung herausgeben zum EURO, mein Problem ist das ich es mit VB zwar hinbekommen habe aber im Access nicht, jetzt weis ich nicht ganz wie ich das anstellen soll?

Kann mir jemand eventuell helfen?

Beschreibungen:

Textfeld 1 = Preis_CHF
Textfeld 2 = Preis_EURO

Preis_CHF ist in einer Tabell gespeichert, Preis_EURO nicht, der soll berechnet und angezeigt werden, als was ganz einfaches.

Karl-Heinz
08.01.2002, 16:17
Hallo Andreas,
wenn dein CHF Feld ein Textfeld ist:

Dim Rechenfeld as Double

Rechenfeld = Me.CHF 'so wird Me.CHF von zu einem Rechenfeld
Me.Textfeld2 = Rechenfeld * Kurs

Karl-Heinz

Res1999
08.01.2002, 16:22
Hallo Andreas


den folgenden Code nach Aktualesierung des Feldes Preis_CHF eingeben

Private Sub Preis_ChF_AfterUpdate()

Me!Preis_Euro = Me!Preis_ChF * 1,999999

end sub

Umtauschkurs natürlich anpassen

Christian


Ups da war Karl-Heinz wohl schneller

[ 08. Januar 2002: Beitrag editiert von: Christian ]</p>