منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .

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

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

RaggiTech