Hi

I'm developing the purchasing database. I am working on processing input details. The opening form is taken from an employee details table and has the standard fields such as Employee number, first name , second name etc. I also have checkboxes representing the benefits an employee can have ie Car, Carpark, Phone and Fuel. I thought that depending on the combination of tickboxes ticked, unticked, I could hold a value in a variable (eg x) that will denote that combination for each employee. I could then use this value to determine what queries need to be ran when viewing details for the employee. The function I have coded in order to calculate x is rejected because of arguments eg

Function getx(vcar As Variant, vphone As Variant, vCarpark As Integer, vFuel As Variant) As Integer

If vcar = -1 And vphone = 0 And vCarpark = 0 And vFuel = 0 Then
    X = 1
Else
    X = 0
End If

etc


Is it possible to use a function with if statements?


Cheers
Tony

__________________
Cheers
Tony

You can use any flow control you want in a function. The function only takes variables and works out a value to return.

It seems to me that you are going to have 16 different combinations of variables you will need to check. That could get dicey.

Perhaps on your form you want to hide the CarPark check box unless the Car check box was checked, and maybe the same for the Fuel check box?

Then you can nest your If Thens like this:
'==========
'This script returns 0
stCar = -1
stCarPark = 0
stX = 0

If stCar = -1 Then
  If stCarPark = -1 Then
    stX = 1
  End If
End If

WScript.Echo stX
'==========

And...

'==========
'This script returns 1
stCar = -1
stCarPark = -1
stX = 0

If stCar = -1 Then
  If stCarPark = -1 Then
    stX = 1
  End If
End If

WScript.Echo stX
'==========

And...

'==========
'This script returns 0
stCar = 0
stCarPark = 0
stX = 0

If stCar = -1 Then
  If stCarPark = -1 Then
    stX = 1
  End If
End If

WScript.Echo stX
'==========

You get the idea.

HTH



mmcdonal

cheers

Cheers
Tony