标题：老六已经解决2个问题：进制转换和全半角转换

1、关于字符增加2个方法：全角和半角转换
2、十六进制与二进制的转换

作系统需要解决以上问题

如有替代办法也行，先谢过了

16进制

Dim Val As string = Convert.ToString(1234,16)

2进制

Dim Val As string = Convert.ToString(1234,2)

10进制

Dim Val As string = Convert.ToString(&H7B,10)  '&H开始表示16进制数

转半角：

'''...
Dim Val As String = "１２３"
Val ＝ StrConv(Val, VbStrConv.Narrow, 0)
Output.show(val)

转全角：

'''...
Dim Val As String = "123"
Val ＝ StrConv(Val, VbStrConv.Wide, 0)
Output.show(val)

谢谢