从文本框Text1输入一个序列,如果出现连续升序的几个数(或字符),称为一个升序段。如字符串“1231223”中存在3个升序段,分别是“123”、“12”和“23”,下列VB程序的功能是统计序列中升序段的个数。 s= Text1. Text i=2 :k=0 :t=0 Do While i <= Len(s) If Then Else k=0 End If If k=1 Then t=t+1 i=i+ 1 Loop Label1.Caption= Str(t) 为实现上述功能,程序中加框①②处应该填入的代码是( )
A . ①Mid(s,i-1,1)<= Mid(s,i,1) ②k=1
B . ①Mid(s,i-1,1)<= Mid(s,i,1) ②k=k+1
C . ①Mid(s,i-1,1)< Mid(s,i,1)②k=1
D . ①Mid(s,i-1,1)< Mid(s,i,1)②k=k+1
答案:D