VB 代码统计器 可用于代码行数的统计 能分不同的情况统计