333

 If Microsoft.VisualBasic.Right(strS, 1) = "/" Then 

            Label1.Text = strS.Replace(Microsoft.VisualBasic.Right(strS, 1), "") 

End If