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)

执行该程序段后，标签Label1上显示的内容是（    ）