• Home
 · 
• Math/Dates
 · 
• Convert Pieces into Dozens. Like converting value of 38 as 3 dzn and 2 pieces.

Convert Pieces into Dozens. Like converting value of 38 as 3 dzn and 2 pieces.

Convert Pieces into Dozens. Like converting value of 38 as 3 dzn and 2 pieces.

Rate Convert Pieces into Dozens. Like converting value of 38 as 3 dzn and 2 pieces.

• 1
• 2
• 3
• 4
• 5

(2(2 Vote))

c = 0
b = Text1.Text
Do While b >= 12
    b = b - 12
    c = c + 1
Loop
If b > 0 Then
    MsgBox "Result is " + Str(c) + " dzn and " + Str(b) + " pcs"
Else
    MsgBox "Result is " + Str(c) + " dzn"
End If
End Sub