主题：动态增加控件重复值提取的问题

Dim ls As List(Of String()) = DataTables("窗口2_Table1").GetValues("审批部门|审批人员","[审批类别] = '执行会审'","拟文_时间")  '字符集合
Dim t As Double = 0
Dim l As Double = 0
Dim m As Integer = ls.Count Mod 1

For i As Integer = 0 To ls.Count - 1
    Dim btn As WinForm.Label
    btn = e.Form.CreateControl("Label" & ls(i)(0) & "|" & ls(i)(1), ControlTypeEnum.Label)
    btn.Text = ls(i)(0) & "|" & ls(i)(1)
    btn.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
    If i = 0 Then
        t = 75 '100
        l = 0
    Else If i Mod 1 = 0
        t + = 40 '150
        l = 0
    Else
        l + = 300
    End If
    btn.Width = 110
    'btn.Autosize = True
    btn.BackColor = Color.Gainsboro
    btn.Height = 30
    btn.Left = l + 350
    btn.Top = t
    'e.Form.AddControl(btn)
    e.Form.Controls("Panel1").AddControl(btn)
Next