gistfile1.vb

    End Sub
    Sub FnRev()
        System.Console.WriteLine("Type in text and press ENTER to reverse it.")
        Dim input1 As String = System.Console.ReadLine()
        Dim revstring As String = StrReverse(input1)
        System.Console.WriteLine(revstring)
    End Sub

    Sub FnCharCnt()
        System.Console.WriteLine("Type in text and press ENTER to see how many characters there are.")
        Dim input2 As String = System.Console.ReadLine()
        Dim CharCnt_input2 As Integer = Len(input2)
        System.Console.WriteLine("The total amount of character are: ")
        System.Console.WriteLine(CharCnt_input2)
    End Sub

    Sub FnWordCnt()
        System.Console.WriteLine("Type in text and Press ENTER to count how many words there are.")
        Dim input3 As String = System.Console.ReadLine()
        Dim WordCnt_input3 As Integer = System.Console.WriteLine(input3.Length)
        'As above it tells me that it doesn't produce a value so what did I do wrong?
        System.Console.WriteLine("The total number of words are: ", WordCnt_input3)
        'I also can't remember how to write the value on the same line as my text as above but it doesn't print the integer.
    End Sub
End Module