Dim Str1 As String = 123456/55555
Dim Str2 As String = 123456If Str1.Contains(Str2) Then Output.Show("有")End If