[Taha Okla]

الكود الذي تريده من Hex To String   وليس العكس

حدد ما تريد بشكل دقيق لتحصل على الكود المناسب


الكود التالي من  Hex To String   في حال التقسيم رباعي الخانات

كود :

Dim Y() As Byte = New Byte(TextBox2.Text.Length / 4) {}


For i = 0 To TextBox2.Text.Length / 4 - 1
   Y(i) = Convert.ToByte(TextBox2.Text.Substring(i * 4, 4), 16)
Next

TextBox3.Text = Encoding.ASCII.GetString(Y)

الكود التالي من  Hex To String   في حال التقسيم ثنائي الخانات

كود :

Dim Y() As Byte = New Byte(TextBox2.Text.Length / 2) {}


For i = 0 To TextBox2.Text.Length / 2 - 1
   Y(i) = Convert.ToByte(TextBox2.Text.Substring(i * 2, 2), 16)
Next

TextBox3.Text = Encoding.ASCII.GetString(Y)