Sub panCustListCell_Click
Dim Numero As String
Dim Mat() As String
Mat=Split(Cadena,"/")
' la idea es poner aqui que si Mat() es mayor que 0 ....
End Sub
Sub Split(Text As String, Delimiter As String) As String()
Return Regex.Split(Delimiter,Text)
End Sub