题目

有如下VB 程序段： s = Text1．Text: k = 1: maxlen = 1 For i = 2 To Len(s)     If Mid(s, i - 1, 1) < Mid(s, i, 1) Then         k = k + 1     If k > maxlen Then maxlen = k     Else         k = 1      End If Next i Label1.Caption = Str(maxlen) 在文本框Text1 中输入字符串“B3b8defhADot”，执行该程序段后，则标签Label1 中显示的内容为（    ） A . 1 B . 5 C . 8 D . 13 答案：B

查看本题答案和解析