|
发表于 14-9-2006 01:18 PM
|
显示全部楼层
Using English : This function is let u convert from string to hexanumber and hexanumber to string. Note : This method is suitable for string which is 0-F so if other than that u need to figure out the algorithm.
Dim convert As String = ""
Dim temp As String = ""
Dim myInteger As ULong
convert = TextBox1.Text
myInteger = ULong.Parse(convert, Globalization.NumberStyles.AllowHexSpecifier)
temp = Hex(myInteger)
MsgBox(temp) |
|