calcution unbound text box

[angie]

Hi I forgot I had another problem that I can not solve.

unbound text box I want the following to calculated
If text box [type] = warranty than 9.00 all other type will be 20.00

so if the text box [type] is warranty than the unbound box will be 9.00
if the [type] is anything other than warranty than the unbound box will be 20.00



Thanks Angie

[ranman256]

txtbox source= IIF([type]='warranty',9,20)

[angie]

that works great, just a question if I wanted to add another type could I ?

[ranman256]

when you start piling on the IIF options, you may want to do a custom function

src = getCalc([type])

public function getCalc(pvType)
  select case pvType
     case "warranty"
           getCalc = 9
     case "optn2"
           getCalc = 3
    case else
         getCalc = 20
end select

OR make TYPE field a combo box
the combo will holde the types and the values you want to set.
in the ON CURRENT event, it will update your text box based on the value in the combo box table.

[angie]

when you start piling on the IIF options, you may want to do a custom function

src = getCalc([type])

public function getCalc(pvType)
  select case pvType
     case "warranty"
           getCalc = 9
     case "optn2"
           getCalc = 3
    case else
         getCalc = 20
end select

OR make TYPE field a combo box
the combo will holde the types and the values you want to set.
in the ON CURRENT event, it will update your text box based on the value in the combo box table.

I should have told you this is on a report that is created using a query

[angie]

This is a unbound text box on a report , where would I put the Code?

[angie]

I got it working thank you
=IIf([type of call]="warranty",9,IIf([type of call]="inspection",9,20))