Re: Calculations on report...

Tech-Archive recommends: Fix windows errors by optimizing your registry

We don't know what you are attempting to accomplish. I think all of what you
are attempting to do can be done without any code.

If you really need code, then it is important to tell us which section and
event contains the code.
--
Duane Hookom
MS Access MVP

"Newf via AccessMonster.com" <u24600@uwe> wrote in message
news:64f538258162d@xxxxxx
I am new in doing calculation in Access. I am using Access 2000 and need a
little help with If Then Staements using in the Control Source. Do I still
need to DIM anything?? Here is the code that i would like to use that I
thought I could use in Vb but an error is coming up. When I use the
Control
Source do I have to refernce to either the query or table for the variable
that I am using or can I just use the name that I used for that field? I
HOPE
someone can help moi. Thanks in advance.

Dim txt_RRSP As Integer
Dim txt_Totals As Integer
Dim rpt_txt_Fed_Tax As Integer
Dim txt_CFSA_Arrears_Tot As Integer
Dim txt_CFSA_Interest_Tot As Integer
Dim txt_CFPF_Arrears_Tot As Integer
Dim txt_CFPF_Interest_Tot As Integer

txt_CFSA_Interest = rpt_txt_CFSA_Arrears
rpt_txt_CFSA_Arrears_Tot = txt_CFSA_Interest
rpt_txt_CFSA_Interest = txt_CFSA_Interest
rpt_txt_CFSA_Interest_Tot = rpt_txt_CFSA_Interest
rpt_txt_CFPF_Arrears_Tot = txt_CFPF_Arrears
rpt_txt_CFPF_Interest_Tot = rpt_txt_CFPF_Late_Interest

txt_CFSA_Arrears_Tot = fCFSA_Arrears_Tot
txt_CFSA_Interest_Tot = fCFSA_Arrears_Tot
txt_CFPF_Arrears_Tot = fCFPF_Arrears_Tot
txt_CFPF_Interest_Tot = fCFSA_Arrears_Tot
rpt_txt_Totals = rTotals
txt_RRSP = fRRSP

rTotals = fCFSA_Arrears_Tot + fCFSA_Arrears_Tot + fCFPF_Arrears_Tot +
fCFSA_Arrears_Tot

If fRRSP <> 0 Then
rpt_txt_Fed_Tax = rTotals * 0.1
Else
rpt_txt_Fed_Tax = 0
End If


Newf
~Everyone needs a NEWFIE as a friend~

--
Newf
~Everyone needs a NEWFIE as a friend~

Message posted via http://www.accessmonster.com



.

Relevant Pages

  • Re: Populate a list box from unlinked table in other database???
    ... not sure what the End Users OS is, I'm doing this for the friend of a ... > I doubt seriously that you'll see any significant performance hits by ... >> Dim vItm As Variant ... >> Dim stWhat As String ...
    (microsoft.public.access.formscoding)
  • Re: How to call api ?
    ... Dim b As New IpHelper ... > Public Class IpHelper ... > Friend IpAddress As String ... > Private ComboIndex As Integer ...
    (microsoft.public.dotnet.languages.vb)
  • Re: How to call api ?
    ... The GetMacAddressis the method that uses the API ... Friend IpAddress As String ... Private Context As Integer ... Dim pAdapterInfo As IntPtr = IntPtr.Zero ...
    (microsoft.public.dotnet.languages.vb)
  • Re: A good digital oscilloscope?
    ... Jan Panteltje wrote: ... maybe that is all I need to tweak, (it is too bright, cannot dim it). ... A friend of mine used to take off the aluminum front panels of similar equipment and,, put it in the dishwasher. ...
    (sci.electronics.design)
  • Re: Testing Private Types
    ... Friend Structure Detail ... Friend Class Parser ... Dim _Detail As New Detail ... Public Sub GetDetailTest() ...
    (microsoft.public.dotnet.general)