VB.Net by API System Text Regularexpressions 2 codes