VB.NET

VB.NET RSS

Need to convert from string to integer

Please support our VB.NET advertiser: Intel Parallel Studio Home

Thread Solved

•

Join Date: Oct 2009

Posts: 32

Reputation: JRabbit2307 is an unknown quantity at this point

Solved Threads: 0

JRabbit2307 JRabbit2307 is offline

Offline

Light Poster

Need to convert from string to integer

22 Days Ago

How would I ask the user to input what type of engine they want and getting an output of $150

 Help with Code Tags 
 vb.net Syntax (Toggle Plain Text) 
Console.WriteLine("Enter EngineChoice for your vehicle:")
        Response = Console.ReadLine()
        EngineChoice = Convert.ToString(Response)
 
        If EngineChoice = Sixcylinder Then
            Convert.ToInt32(Response)
            Console.WriteLine(150)
        ElseIf EngineChoice = Eightcylinder Then
            Console.WriteLine(475)
        ElseIf EngineChoice = Diesel Then
            Console.WriteLine(750)
Console.WriteLine("Enter EngineChoice for your vehicle:")
        Response = Console.ReadLine()
        EngineChoice = Convert.ToString(Response)

        If EngineChoice = Sixcylinder Then
            Convert.ToInt32(Response)
            Console.WriteLine(150)
        ElseIf EngineChoice = Eightcylinder Then
            Console.WriteLine(475)
        ElseIf EngineChoice = Diesel Then
            Console.WriteLine(750)

•

Join Date: Sep 2009

Posts: 286

Reputation: TomW is on a distinguished road

Solved Threads: 37

TomW

Offline

Posting Whiz in Training

22 Days Ago

This is a console app or is that just for your example? If a console app, I would start by displaying a list of the choices they have to pick from with an item/row number starting each line and then asking for them to type that item/row number in for the input. Also remember what is read/written is already text even if there writing a number...

 Help with Code Tags 
 VB Syntax (Toggle Plain Text) 
        Dim strEngineChoice As String = ""
 
        Console.WriteLine("Enter 1 for six cylinder")
        Console.WriteLine("Enter 2 for eight cylinder")
        Console.WriteLine("Enter 3 for disel")
 
        strEngineChoice = Console.ReadLine
 
        Select Case strEngineChoice
            Case "1"
                Console.WriteLine("Price : $150")
            Case "2"
                Console.WriteLine("Price : $475")
            Case "3"
                Console.WriteLine("Price : $750")
            Case Else
                Console.WriteLine("Invalid selection")
        End Select
        Dim strEngineChoice As String = ""

        Console.WriteLine("Enter 1 for six cylinder")
        Console.WriteLine("Enter 2 for eight cylinder")
        Console.WriteLine("Enter 3 for disel")

        strEngineChoice = Console.ReadLine

        Select Case strEngineChoice
            Case "1"
                Console.WriteLine("Price : $150")
            Case "2"
                Console.WriteLine("Price : $475")
            Case "3"
                Console.WriteLine("Price : $750")
            Case Else
                Console.WriteLine("Invalid selection")
        End Select