'let str is a byte in 0 - 255
Dim str As Integer = tb_BYTE.Text
Me.TB_BIN.Text = "Bin:" & Convert.ToString(str, 2)
Me.TB_OCT.Text = "Oct:" & Convert.ToString(str, 8)
Me.TB_DEC.Text = "Dec:" & Convert.ToString(str, 10)
Me.TB_HEXA.Text = "Hex:" & Convert.ToString(str, 16).ToUpper
No comments:
Post a Comment