Public Function GetByte(ByVal p_s) As Integer Dim bySource() As Byte Dim byEncoded() As Byte Dim destEncoding As Encoding '更多.net源码和实例,来自乐博网www.lob.cn 文字列をバイト配列に変換 bySource = Encoding.Unicode.GetBytes(p_s) エンコーディングを取得 (シフトJISコードページ) ...