1. (2021高二下·浙江月考) 为庆祝新学期到来，某校学生会组织开展文体演艺活动，现按活动要求，将各班学生编排成“三角”队形。队形有以下要求：

第一排正中间安排1人；第二排正中间安排3人；第三排正中间安排5人……，如此循环，直至班级人数不足以站满一排后结束编排。

三角队形外围一圈的同学对服装有特殊要求，需要进行标记（中间的同学用“●”标记，外围的同学用“▲”标记）

编写VB程序，实现队形编排功能：在文本框Text l中输入班级人数，单击“展示队形”按钮Command1后，将班级学生队形显示在列表框List 1中。例如，当班级学生数为54的时候，程序运行界面如图所示。

1. （1） 根据题意，如果输入的班级人数为70，则三角队形的最后一行人数为。
3. （2） 程序代码中加框处有错误，请改正。

   Private Sub Command 1_Click( )

       Dim i As Integer，j As Integer

       Dim cnt As Integer，nAs Integer，tmp As Integer

       Dim kw As String，zw As String，c As String

       List 1.Clear

       cnt=Val（Text 1.Text）

       n=0：tmp= 1

       Do While     ‘计算三角队形的行数

           cnt=cnt-tmp

           tmp=tmp+ 2

           n=n+1

       Loop

       For i=1 T on

           kw=""：zw=""

           For j=i T on-1

               kw=kw+" "

           Next j

           If i=n The nc="▲" Else c="●"

           For j= 1 To 2*（i-1）-1

               zw=zw+c

           Next j

           IfThen

               ZW="▲"

           Else

               zw="▲"+zw+"▲"

           End If

           List 1.Add Item

       Next i

   End Sub

5. （3） 实现队形编排功能的VB程序如下，请在划线处填入合适的代码。