I'm developing a VB program, and I'm analyzing a set of strings. 
These string are 6 numbers on a row separated by a space. 

> 
> 5 1.667e-02 5.08 4.98 0.01112
> 
> 
> 

I want to count the spaces and at line break reset the counter

```
If Mid(line, g, 1) = " " Then
    Dim h As integer
    h = h + 1  
End If 

```

How do I do this? Is it possible on VB?