有如下VB 程序代码段：

s1 = "51577": s2 = "75929"

i = 1: j = 1: k = 0

Do While i <= Len(s1) And j <= Len(s2)

    c1 = Mid(s1, i, 1): c2 = Mid(s2, j, 1)

    If Abs(Val(c1) - Val(c2)) < 4 Then

        i = i + 1

    Else

        k = k + 1

    End If

    j = j + 1

Loop

执行该程序段后，变量k的值是（    ）

A、2

B、3

C、4

D、5