25-01-2009, 12:34 AM
It returns 0... Must not be saving correctly?
That's what's in the "Ok" button...
Code:
FishName = Item(scrlFishNo.Value).Name
ToolName = Item(scrlToolNo.Value).Name
FishNumber = frmFish.scrlFishNo.Value
ToolNumber = frmFish.scrlToolNo.Value
Unload Me
That's what's in the "Ok" button...