复选框和十六进制等效

Question

我有四个复选框，复选框1到复选框4。将这四个复选框视为二进制0000.如果选中复选框1，则二进制文件应更改为1000.对于其他复选框，应设置相应的位。最后，我想要的输出是四位的十六进制等效值。如果没有选中复选框，则应返回0 throgh F.0。 F，选中所有复选框时。

Answer 1

有很多方法。例如，如果它只是4位，则单独添加它们：

    Dim intValue As Integer = 0
    If CheckBox0.Checked Then intValue += 1
    If CheckBox1.Checked Then intValue += 2
    If CheckBox2.Checked Then intValue += 4
    If CheckBox3.Checked Then intValue += 8
    Dim strHex As String = intValue.ToString("x")

如果可能有4个以上，最好用循环替换中间位。 最后一行的.ToString（“x”）给出十六进制表示的数字。我认为这就是你所需要的一切吗？