※ 引述《CuckooBoy (新竹的仔)》之銘言：
: 假設
: c = 1000000000000000_0100000000000000_....
: 如何將他轉成 8000_4000_....
: 有底線, 不知道怎麼轉....~"~
手上只有vs2008 請自行改一下吧
首先呢 去把下面function copy下來
http://www.cnblogs.com/popcorn/archive/2004/06/09/14582.aspx
然後在另一個sub / function測試下面程式
Dim stringArray() As String = _
"1000000000000000_0100000000000000".Split("_")
Dim result As String = ""
Dim i As Integer = 1
For Each t As String In stringArray
result += Hex(BinaryToDecimal(t))
If i < stringArray.Length Then result += "_"
i += 1
Next
result 就是你要的解
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 61.216.6.57