Imports System
Public Class MainClass
Shared Sub Main()
'Declare variables
Dim strData As String
Dim strNewData As String
'Get the text from the TextBox
strData = "Hello You"
'Replace the string occurance
strNewData = strData.Replace("Hello", "Goodbye")
'Display the new string
System.Console.WriteLine(strNewData)
End Sub
End Class