subform data kopieren en afronden

Status
Niet open voor verdere reacties.

klablabla

Gebruiker
Lid geworden
28 apr 2008
Berichten
116
Ik heb een subform waar ik text uit kopieer naar het hoofdform met de volgende code:

in een textbox bij control source staat het volgende.
=[SubFrmafgifte].[Form]![txtsumPrijs]

Waar ik nu mee zit als het txtsumprijs leeg is. (door filter)
komt er ERROR te staan. Gaag zou ik hier een 0 hebben.


Ook kopieer ik met een knop diverse textboxen van het hoofdform weer terug naar een ander subform.
Wat er dan gebeurd als er 1.84 staat, is dat hij in het subform er een 2 van maakt.
Hij rond hem dus af en dat wil ik niet. Maar weet niet waar ik dit mee kan aanpassen.
De volgende code gebruik achter een knop:
Me.subRptTotaal.Form.Txtactie.Value = Me.txtActie.Value
 
Dit zou je Error moeten verhelpen:=Nz([SubFrmafgifte].[Form]![txtsumPrijs];0)
Als je een afronding krijgt bij het heen en weer kopieren, staan de notatie-eigenschappen van het veld misschien verkeerd, of die van de onderliggende tabel. Kijk eens wat er gebeurt als je met een Msgbox de waarde opvraagt van de twee tekstvelden na het kopieren:
Code:
Msgbox Me.subRptTotaal.Form.Txtactie.Value & vbCrLF & Me.txtActie.Value
Die zou de opgeslagen waarden moeten laten zien. Dan weet je of het in de tabel zit, of in het tekstveld.
 
Helaas blijft hij een #error geven bij =Nz([SubFrmafgifte].[Form]![txtsumPrijs];0)

bij de msgbox krijg ik de volgende 2 getallen:

2
2.1.3020833333333

Waar zal ik verder moeten zoeken?
 
Helaas heb ik nog steeds het probleem.
Zoals hierboven geeft de msgbox 2 en 2.130208333 aan.
Waarom rond hij af???
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan