Here is my programming code
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
TextBox1.Text = Replace(TextBox1.Text, "http://", "")
Dim endc As Integer = InStr(1, TextBox1.Text, "/")
MsgBox(Microsoft.VisualBasic.Right(TextBox1.Text, endc))
End Sub
End Class
I want to change website addresses like
http://itunes.apple.com/gb/app/
http://www.vam.ac.uk/collections/tex...y/world_beach/
to
itunes.app.com
www.vam.ac.uk
But so far i'm getting as output from my program
apple.com/gb/app/
And
y/world_beach/
How can I get this to work, any help would be amazing
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
TextBox1.Text = Replace(TextBox1.Text, "http://", "")
Dim endc As Integer = InStr(1, TextBox1.Text, "/")
MsgBox(Microsoft.VisualBasic.Right(TextBox1.Text, endc))
End Sub
End Class
I want to change website addresses like
http://itunes.apple.com/gb/app/
http://www.vam.ac.uk/collections/tex...y/world_beach/
to
itunes.app.com
www.vam.ac.uk
But so far i'm getting as output from my program
apple.com/gb/app/
And
y/world_beach/
How can I get this to work, any help would be amazing
![smile.gif](http://www.vbforums.com/images/smilies/smile.gif)