For i=1 to 2

    For j=1 to 5-i

      If a(j+1)<a(j)Then t=a(j)：a(j)=a(j+1)：a(j+1)=t

    Next j

  Next i

s=“26170534”:n=Len(s):y=“”

For i=1 To n

 ch(i)=Mid(s, i, 1)

Next i

For i=1 To n

 k=i

 For j=i To n Step 2

  If ch(j)< ch(k) Then k=j

 Next j

 If k <> i Then t=ch(k): ch(k)=ch(i): ch(i)=t

 y=y & ch(i)

Next i

Label1.Caption=y

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

鞋子尺码换算：常用的两种鞋码一种是欧制的码m，而我国采用的标准为厘米数g，鞋子尺码的换算公式：欧制m=中国制g*2-10。例如25是我国采用的厘米数，换算成欧制的码为25*2-10=40(码)。

按纪念品价值进行分组，每组总价值不超过限定值w且最多包含两件，要求分组数最少。编写VB程序解决该问题，程序运行时，在文本框Text1中依次输入每件纪念品的价格(不超过w)，以逗号分隔，在文本框Text2中输入限定值w，单击“分组”按钮，在标签Label2上输出最少的分组数。程序运行界面如图所示。