Private Sub Command1_Click()

Dim sum As Double, x As Double

 sum = 0

 n = 0

 For i = 1 To 5

  x = n / i

  n = n + 1

  sum = sum + x

 Next

End Sub

该程序通过For循环计算sum的值，下列表达式的值与sum相等的是（  ）

程序运行界面如下图所示。

s = "Li20An24K04ao" ;  i = 0

while i < len( s ) :

    if  "A" <= s[ i ] <= "Z" :

        s = s[ : i ] + s[ i + 1 : ]

    elif  "0" <= s[ i ] <= "9" :

        s = s[ : i ] + str( ( int(s[ i ]) + 8 ) % 10 ) + s[ i + 1 : ]

    else :

        s = s[ : i ] + chr( ( ord( s[ i ] ) – 95 ) % 26 + 97 ) + s[ i + 1 : ]

    i = i + 1

执行上述程序后，s的值为（   ）