[DBJ]

I am trying to output the number of times a person hit the enter key after submitting 5 keystrokes. I am trying to convert the input to ascii, but everything I try returns an error message when I try to do the conversion to ascii. It states the Console function can not have an integer value. By the way this is a console application. This is what I have so far:

Dim inputVal As ConsoleKeyInfo
Console.WriteLine("Enter 5 keystrokes")
Dim counter As Integer
Dim i As Integer
For i = 1 To 5
inputVal = Console.ReadKey
If inputVal = Asc("cr") Then
counter = counter + 1
End If
Next
Console.WriteLine()
Console.WriteLine("You clicked Enter " & counter & " times")
Console.Write("Hit any key to continue...")
Console.ReadKey()

I think I am missing something in the conversion process, because the logic I am using seems correct. Any guidance would greatly be appreciated.

[DBJ]

okay...so i figured this out....I converted the inputVal.Key to chr(13) by doing the following
If Char(inputval.Key) = chr(13) then
counter = counter + 1

This solved that problem...now I want it to loop until i hit "x", the ascii chart states the "x" should be chr(120) but it seems as though when I use that it does not correspond to "x". After some experimentation i found that some of the numbers do not correspond to that character.

Below is a code example

Sub Main()
Dim inputVal As ConsoleKeyInfo
Console.WriteLine("Enter 5 keystrokes")
Dim counter As Integer

inputVal = Console.ReadKey
While Chr(inputVal.Key) <> Chr(120)
inputVal = Console.ReadKey
If Chr(inputVal.Key) = Chr(13) Then
counter = counter + 1
End If
End While

Console.WriteLine()
Console.WriteLine("You clicked Enter " & counter & " times")
Console.Write("Hit any key to continue...")
Console.ReadKey()

Do I have wrong value in the Chr() method. According to the chart is seems 120 is the right value. Again any guidance would be greatly appreciated.

[Amadeus]

The following should work:

inputVal = Console.ReadKey(True)
If inputVal.Key=ConsoleKey.Enter
   'you have the enter key
End If

For the x input, try looping until inputVal.Key=ConsoleKey.x...

[DBJ]

I know about consolekey.x and I would use that except the lesson is dealing with converting input to chr and theoritically it should work like chr(13) but for some reason chr(120) is not equalling to "x" and according to the ascii chart it should. Any clues about that? Thanks for your help and time.

[DBJ]

I wanted to know if anyone had a chance to look at my response to the help I recieved. I am asking again just to see if anyone else may have an idea or may be able to guide me in the right direction. Again, thanks for all of your help.