i now tried this in 2 separate forms . i created a button in form2 and typed this Dim adult As Decimal Call getadult(adult) MsgBox("the rate for adults is " & adult) it works for me in the same form, but wen i try to call the function adult over another form. it doesnt work. the variable adult is a global variable and the function is also a public function.. please help me