Convert ascii to Character strings

Description :

This code shows how to Convert ascii to Character strings

Code :

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim x As String = "JESUS NEVER FAILS"
Dim x2 As String
Dim Z3 As String

For i As Integer = 0 To x.Length - 1
Dim x1 As String = Asc(x.Substring(i, 1))
x2 = x2 & x1
Response.Write(" Ascii Code : " + x2)
Dim z1 As String = x2
For i As Integer = 0 To z1.Length - 1 Step 2
Dim z2 As String = Chr(z1.Substring(i, 2))
Z3 = Z3 & z2
Response.Write(" Character : " + Z3)
End Sub


No responses found. Be the first to comment...

  • Do not include your name, "with regards" etc in the comment. Write detailed comment, relevant to the topic.
  • No HTML formatting and links to other web sites are allowed.
  • This is a strictly moderated site. Absolutely no spam allowed.
  • Name: