Hex (Asc("心")) ' Big5 A4DF ? Hex(AscW("心")) ' Unicode 5FC3 所以用VBA 包一個函數: Function MyAsc(ByVal strChar As String) As String MyAsc = Hex(Asc(strChar))
確定! 回上一頁