vb如何用正则表达式把几大段字符里所有正好是8位的数字提取出来

举例比如如下(实际会有十几万行).
用vbcrlf先拆分成数组我会, 然后循环用正则提取每个数组成员里刚好是8位的数字(8个连续都是数字),要怎么写呢? (首位不会是0).  多谢! 用vbcrlf先拆分成数组我会, 然后循环用