private bool CheckDescriptionOfVar(string text)
        {
           Match m;
           string Pattern = @"Dim([\s]*([\S]*)[\s]*As[\s]*([\S]*)[,]?[\s]*)*"; 

           //ВАРИАНТ 1
           Regex pat = new Regex(Pattern);
           MatchCollection matchcol = pat.Matches(text);

           foreach (Match match in matchcol)
           {
               for (int i = 0; i < match.Groups.Count; i++)
               {
                   MessageBox.Show(match.Groups[i].ToString());
               }
               
           }

           //ВАРИАНТ 2
            Regex myregex = new Regex(Pattern);
  
           string[] item;
           item = myregex.Split(text);
         
            return false;
        }