Two types of case statments

Hi,

I have two different types of case statements in two different forms.

Version 1 is based on a field called locat1.
Select Case locat1
Case "Ops"
strcnt = "ops"
End Select

Version 2 is based on a group box.
Select Case grpStaff.Value
Case 1
strcnt = "Ops"
End Select

The additional case statements for each follow suit.
What I'd like to do is to change either one so I can create a module where I
can access one type of case statement for both programs.

please give your views..

Thanks