[RaggiTech]

كاتب الموضوع : 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)