title image


Smiley Re: Maße bei der Eingabe runden
Am besten definierst du für deine Eingabefelder 2 Ereignisprozeduren der folgenden Art:Private Sub Hoehe_AfterUpdate()If IsNumeric(Me!MeinFeld) Then Me!Hoehe = -Sgn(Me!Hoehe) * Int(-Abs(Me!Hoehe) / 10) * 10' wenn nur positive Werte vorkommen, reicht:' Me!Hoehe = -Int(-Me!Hoehe / 10) * 10Else Me!Hoehe = NullEnd If' ggf. auch gleich hier:If isnumeric(Me!Hoehe) and Isnumeric(Me!Breite) then _ Me!Flaeche = Format((Me!Hoehe * Me!Breite)/1E6,"0.00")' in qm!End Sub'' analog für das Feld "Breite"...'Reinhard


Gruß aus dem Norden
Reinhard


Bitte immer die Access-Version angeben!
DB-Wiki


Wie man Fragen richtig stellt

YaccessAccess-FAQUnd ansonsten: Wikipedia




geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: