(Solved) : Need Code Translateing English Pig Latin Vb Asked Chegg Answered Answer Correct Code Chegg Q29738168 . . . .

I need a code for translateing English to Pig Latin in VB, Ihave asked it, Chegg answered but the answer is not correct.

the code from Chegg is:

Public Class Form1

Private Sub btnTran_Click(sender As Object, e As EventArgs)Handles btnTran.Click

Dim Sentence As String
Dim letter As String, wordI As String, word1 As String, word AsDouble, wordamount As Double, counter As Integer = 0, current AsDouble

txtOutput.Text = “”

Try

Sentence = (txtInput.Text).ToUpper

wordamount = Wordcount(Sentence)

lbl1.Text = wordamount

Do Until counter = wordamount

Sentence = Sentence & ” “

If counter = 0 Then

word = Sentence.IndexOf(” “)

word1 = Sentence.Substring(0, word)

Else

word = Sentence.IndexOf(” “, counter)

word1 = Sentence.Substring((txtOutput.Text.Length), word)

End If

letter = Microsoft.VisualBasic.Left(word1, 1)

counter +=