玩家通过4种指令控制小人运动：

· 左 X：小人向左移动X个格子

· 右 X：小人向右移动X个格子

· 下 X：小人向下移动X个格子

· 挖矿：收集小人所在格子的金矿

小人收集金矿需要遵循一定的规则：

①小人必须将当前行的金矿全部收集，才能去往下一行，即金矿需从上到下收集

②对于同一行的金矿，小人必须按照从左往右的顺序开始收集

现编写程序，以8*8的矩阵为例，在文本框Text1中输入金矿数量，点击按钮“开始”后，随机产生对应数量的金矿并借助图形控件输出（保证不会在同一个格子出现两个金矿），并且在列表框List1中按顺序输出指令，使小人按照规则得到所有金矿。如图a所示。请回答下列问题。

图a

c=“1234”

For i=1 To 4

    Print_________

Next

如果要让程序运行后得到如下结果：

1 12 123 1234

则在下划线处应填入的内容为（  ）。

编写一个“合并重叠区间”的VB程序，功能如下：在文本框Text1中按各区间起始值升序依次输入各区间的起始值和终止值（数据都用逗号分隔并以逗号结尾），单击“确定”按钮后，在Text2中显示合并后的各个区间｡例如，在文本框Text1中输入“1，2，3，5，4，6，9，12，10，11，”，表示区间[1，2]，[3，5]，[4，6]，[9，12]，[10，11]，合并后的区间分别为[1，2]，[3，6]，[9，12]｡程序运行界面如图所示，实现上述功能的VB代码如下：

Const n=100

Private Sub Cmd1_Click()

    Dim i As Integer, k As Integer, L As Integer, R As Integer

    Dim s As String, c As String, t As String, result As String

    Dim a(1 To n) As Integer

    s=   ①   : t=" ": k=0

    For i=1 To Len(s)

        c=Mid(s, i, 1)

        If c<>"," Then

                 ②      

        Else

            k=k+1

            a(k)=Val(t)

            t=""

        End If

    Next i

    L=a(1): R=a(2)

    i=3

    Do While i<=k

        If a(i)>R Then

            result = result+"("+Str(L)+","+Str(R)+"),"

            L=a(i): R=a(i+1)

            R=a(i+1)

        End If

            ③   

    Loop

    result=result+"("+Str(L)+","+Str(R)+"),"

    Text2. Text=result

End Sub

flag=False:s="ShanShui2020！"

For i=1 To Len（s）

    ch=Mid（s，i，1）

    If Not（ch〉="0"And ch<="9"）And Not flag Then

        t=ch+t

    End If

    flag=Not flag

Next i

Text1.Text=t

执行完以上程序段后，文本框text1中的内容为（      ）

s=1

for i in range(_):

    s=s+i print(s) 

s="0923 Hangzhou Yayunhui"; t=""

for i in range(len(s)):

    j=s[i]

    if not j>="a" or j>"z":

        t=""

        t=j+t

print(t)

程序运行后，输出的内容是（    ）