Soma linha por linha

Boa tarde, estou precisando somar linhas, (a soma por coluna é tranquilo) ex.

1 + 1 + 2 + 2 = 6

2 + 2 + 2 + 2 = 8

1 + 1 + 1 + 1 = 4

Bom meu código está assim

While Not Rsi.EOF

Response.Write totalpedidos*Rsi("medida")

Rsi.MoveNext

Preciso da lógica de soma dessa linha Response.Write totalpedidos*Rsi("medida")