Private Sub Command1_Click()

 Dim a As Integer,b As Integer

 a=10    ‘①

 b=20    ‘②

 Text1.Text=“a+b=”+Val(a+b)    ‘③

End Sub    ‘④

发生“类型不匹配”错误时所执行的语句是（  ）

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的值为（   ）

请回答下列问题：