Converting a character code to char (VB.NET)

Question

I'm able to convert a character to its corresponding character/ASCII code using "Asc(CHAR)". What can I use to convert this returned integer back to its original character form?

Note: `Asc` is not for ASCII precisely but it is sufficient for ASCII. It is for the user's current default code page/character encoding, which varies from user to user, machine to machine and time to time. **In most cases, you'd want to use a fixed character encoding**. VB4/5/6/A/Script/.NET… use **UTF-16** for string elements. Use `AscW` and `ChrW` for that. — Tom Blodget, Dec 13 '18 at 23:35

score 74 · Accepted Answer · edited May 25 '15 at 21:35

74

The Chr function in VB.NET converts the integer back to the character:

Dim i As Integer = Asc("x") ' Convert to ASCII integer.
Dim x As Char = Chr(i)      ' Convert ASCII integer to char.

edited May 25 '15 at 21:35

acdcjunior

132,397
37
331
304

answered Feb 01 '11 at 01:06

Jason Yost

4,807
7
42
65

score 13 · Answer 2 · edited Jul 18 '14 at 15:26

13

Use the Chr or ChrW function, Chr(charNumber).

edited Jul 18 '14 at 15:26

Peter Mortensen

30,738
21
105
131

answered Feb 01 '11 at 01:03

The Scrum Meister

29,681
8
66
64

Thank you, I'll give it a try. This sounds exactly like what I need :D – Freesnöw Feb 01 '11 at 01:04

score 5 · Answer 3 · answered Dec 13 '18 at 18:26

5

you can also use

Dim intValue as integer = 65  ' letter A for instance
Dim strValue As String = Char.ConvertFromUtf32(intValue)

this doesn't requirement Microsoft.VisualBasic reference

answered Dec 13 '18 at 18:26

Georg

404
5
7

score 2 · Answer 4 · answered Feb 01 '11 at 01:04

2

You could use the Chr(int) function

answered Feb 01 '11 at 01:04

AlexJF

886
1
6
11

score 0 · Answer 5 · answered Jun 14 '23 at 12:34

0

Module Module1

Sub Main()
    Dim n, n1, sum, rm, cnt As Integer
    Console.WriteLine("Enter a Number: ")
    n = CInt(Console.ReadLine())
    n1 = n
    sum = 0
    cnt = n1.ToString.Length - 1
    While n1 <> 0
        rm = n1 Mod 10
        sum = sum + rm * CInt(Math.Pow(10, cnt))
        cnt = cnt - 1
        n1 = n1  10
    End While
    If n = sum Then
        Console.WriteLine("Number is Palindrom")
    Else
        Console.WriteLine("Number is Palindrom")
    End If
End Sub

End Module

answered Jun 14 '23 at 12:34

chandan kumar

1

Hi, this question was correctly answered in 2011, about 12 years ago. While it is usually appreciated to get more answers to the same question, in this case I don't think it is necessary as the precedent solution was exhaustive and precise. – B3S Jun 16 '23 at 12:09

Converting a character code to char (VB.NET)

5 Answers5

Linked