17-10-12, 04:54 PM
كاتب الموضوع : AhmedEssawy
للتحويل من مصفوفة حروف إلى نص :كود :
Private Function ConvertByteArrayToString(ByVal byteArray As Byte()) As String
Dim enc As Encoding = Encoding.UTF8
Dim text As String = enc.GetString(byteArray)
Return text
End Function
وللتحويل من نص إلى سلسلة حروف :
كود :
dim bytes as Byte() = System.Text.Encoding.Unicode.GetBytes("StringToConvert")
كود :
Dim hexString As String = Hex(48)
كود :
Dim octal As String = Oct(48)