1. (2021·浙江模擬) 有如下VB程序段：

s = "python": b = 0

For i = 1 To Len(s) - 1

    a = Abs(Asc(Mid(s, i, 1)) - Asc(Mid(s, i + 1, 1)))

    If a > b Then b = a

Next i

Label1．Caption = Str(b)

執(zhí)行該程序段后，標(biāo)簽Label1上顯示的內(nèi)容是（    ）