string=textbox1.text.remove(47,10)

for i as integer=0 to 10000000
'your analysis
label1.text=i/100000 & "%"
next

for i as integer=0 to 10000000 
'analysis part
ProgressLabel.Text= i*100/10000000 'or ...=i/100000 , obvious right?
next

if checkedlistbox.getchecked(chekedlistbox.selectedindex) then
...
end if

Public Class Form1
    Private Numbers(2,10) As Integer
    Private number As Integer
    Private UpperBound As Integer

    Private Sub btnDisplay_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnDisplay.Click
        Dim sr As IO.StreamReader = IO.File.OpenText("Num.txt")

        For i As Integer = 0 To 19     'before there were 21 loops for 20 lines?

dim Exists as boolean=false
for i as integer=0 to your_combo.items.count-1 do
if your_combo.items.item(i)=new_equipment_name then
Exists=true;
exit for;
end if
next

if not Exists then
your_combo.items.add(new_equipment_name)
else
msgbox("Already in the list")
end if

Main.Cmd.CommandText = "SELECT ID, NAME FROM NAMES;"
Main.DA.SelectCommand = Main.Cmd
Main.DT = New DataTable
Main.DA.Fill(Main.DT)
ComboBox3.DataSource = Main.DT
ComboBox3.ValueMember = Main.DT.Columns.Item(0).ToString
ComboBox3.DisplayMember = Main.DT.Columns.Item(1).ToString

SELECT C.NAME AS Имя,C.PROCESSOR AS Процессор,C.MONITOR AS Монитор,A.NAME AS Действие, P.DATE AS Дата, P.NOTES AS Замечания, U.NAME

        For i As Integer = 0 To n ' as many as you need
            Dim label As New System.Windows.Forms.Label
            Me.SuspendLayout()
            label.Location = New System.Drawing.Point(112, 96 + i * 96) 'you can change the location to your preference, just make sure they don't overlap 
            label.Name = "label"

 
For i As Integer = 0 To 5
            Dim Button As New System.Windows.Forms.Button
            Me.SuspendLayout()
            Button.Location = New System.Drawing.Point(112, 96 + i * 96)
            Button.Name = "Button" + i.ToString
            Button.TabIndex = 0
            Button.Text

If not Page.Isvalid then
return
else
....
end if