I have the following formula that I need to return numbers like 100, 50, 35 and not 100.00, 50.00, or 35.00. Any ideas?

if len(ToText({PAP_Meds.Dosage})) = 1 then
"0000000" &{PAP_Meds.Dosage}
else if len(ToText({PAP_Meds.Dosage})) = 2 then
"000000" &{PAP_Meds.Dosage}
else if len(ToText({PAP_Meds.Dosage})) = 3 then
"00000" &{PAP_Meds.Dosage}
else if len(ToText({PAP_Meds.Dosage})) = 4 then
"0000" &{PAP_Meds.Dosage}
else if len(ToText({PAP_Meds.Dosage})) = 5 then
"000" &{PAP_Meds.Dosage}
else if len(ToText({PAP_Meds.Dosage})) = 6 then
"00" &{PAP_Meds.Dosage}
else if len(ToText({PAP_Meds.Dosage})) = 7 then
"0" &{PAP_Meds.Dosage}
else (ToText ({PAP_Meds.Dosage}))

I had to ToText them to add the leading zeros.