Блог

Как мне преобразовать единицу измерения в vb.net как в приведенном ниже примере.

 12 Pcs=1 Dozen   
  

Если я помещу 14 ПК в textbox1.text, он ответит в поле для надписей, как показано ниже. Пожалуйста, помогите мне.

 14 Pcs- Textbox1.Text

1 Dozen 2 Pcs- Label1.text
  

Попробуйте это

         Dim Quantity As Integer
        Dim Dozens As Integer
        Dim Pcs As Integer

        Int32.TryParse(txtPcs.Text, Quantity)

        Dozens = Quantity / 12

        Pcs = (Quantity - (Dozens * 12)) Mod 12