สอบถามเรื่องการ Loop สร้าง Label นำไปใช้ตรวจสถานะใน SQL การทำงานคล้ายกับตรวจห้องว่างของโรงแรม

Dim lbl As Label
        For n = 0 To C_ROW * C_COLUMN - 1
            lbl = New Label
            lbl.Size = lbl_size
            lbl.Location = New Point((n Mod C_COLUMN) * C_DIFF_X, (n \ C_COLUMN) * C_DIFF_Y)
            lbl.BackColor = Color.White
            lbl.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
            lbl.Name = "ก" & n
            lbl.Text = (n \ C_COLUMN).ToString & "-" & (n Mod C_COLUMN)
            AddHandler lbl.Click, AddressOf Me.Label_Click
            Me.Panel1.Controls.Add(lbl)
        Next