multiple permutations

General
1

any suggestions on an efficient way to get all the permutations of below

if a.Option3_Value="" and a.Option2_Value="" and a.Option1_Value ="" then numOfOptions=0
if a.Option3_Value="" and a.Option2_Value="" and a.Option1_Value <>"" then numOfOptions=1
if a.Option3_Value="" and a.Option2_Value<>"" and a.Option1_Value ="" then numOfOptions=1
if a.Option3_Value<>"" and a.Option2_Value="" and a.Option1_Value ="" then numOfOptions=1

etc

2 
if a.Option1_Value <> "" then
  numOfOptions = numOfOptions + 1
end if
if a.Option2_Value <> "" then
  numOfOptions = numOfOptions + 1
end if
if a.Option3_Value <> "" then
  numOfOptions = numOfOptions + 1
end if
3

Thanks, Kem.