อยากรู้การสร้าง Table หลายๆ Table หรือแบบที่วนลูป ใน asp.net

		'*** Rows ***'
        Dim Tr As TableRow
		'*** Column ***'
        Dim Tc As TableCell
		

		'*** Create Header ***'

		'*** New Rows ***'
        Tr = New TableRow()

		'*** New Cell (Header CustomerID) ***'
        Tc = New TableCell()
        'Tc.BorderColor = Drawing.Color.Black
        Tc.BorderWidth = 1
        Dim lblHeadCustomerID As New Label
        With lblHeadCustomerID
            .Text = "CustomerID"
			.Font.Bold = True
        End With		
        Tc.Controls.Add(lblHeadCustomerID)  '*** Add lblHeadCustomerID To Cell ***'
        Tr.Cells.Add(Tc) '*** Add Cell To Rows ***'

		'*** New Cell (Header Name) ***'
        Tc = New TableCell()
        'Tc.BorderColor = Drawing.Color.Black
        Tc.BorderWidth = 1
        Dim lblHeadName As New Label
        With lblHeadName
            .Text = "Name"
			.Font.Bold = True
        End With		
        Tc.Controls.Add(lblHeadName)  '*** Add lblHeadName To Cell ***'
        Tr.Cells.Add(Tc) '*** Add Cell To Rows ***'

		'*** New Cell (Header Email) ***'
        Tc = New TableCell()
        'Tc.BorderColor = Drawing.Color.Black
        Tc.BorderWidth = 1
        Dim lblHeadEmail As New Label
        With lblHeadEmail
            .Text = "Email"
			.Font.Bold = True
        End With		
        Tc.Controls.Add(lblHeadEmail)  '*** Add lblHeadEmail To Cell ***'
        Tr.Cells.Add(Tc) '*** Add Cell To Rows ***'

		'*** New Cell (Header CountryCode) ***'
        Tc = New TableCell()
        'Tc.BorderColor = Drawing.Color.Black
        Tc.BorderWidth = 1
        Dim lblHeadCountryCode As New Label
        With lblHeadCountryCode
            .Text = "CountryCode"
			.Font.Bold = True
        End With		
        Tc.Controls.Add(lblHeadCountryCode)  '*** Add lblHeadCountryCode To Cell ***'
        Tr.Cells.Add(Tc) '*** Add Cell To Rows ***'

		'*** New Cell (Header Budget) ***'
        Tc = New TableCell()
        'Tc.BorderColor = Drawing.Color.Black
        Tc.BorderWidth = 1
        Dim lblHeadBudget As New Label
        With lblHeadBudget
            .Text = "Budget"
			.Font.Bold = True
        End With		
        Tc.Controls.Add(lblHeadBudget)  '*** Add lblHeadBudget To Cell ***'
        Tr.Cells.Add(Tc) '*** Add Cell To Rows ***'

		'*** New Cell (Header Used) ***'
        Tc = New TableCell()
        'Tc.BorderColor = Drawing.Color.Black
        Tc.BorderWidth = 1
        Dim lblHeadUsed As New Label
        With lblHeadUsed
            .Text = "Used"
			.Font.Bold = True
        End With		

		//*** Create Table **//
		Table Tb = new Table();
		//Tb.BorderColor = Drawing.Color.Black();
		Tb.BorderWidth = 1;

		//*** Rows ***//
        TableRow Tr;
		//*** Column ***//
        TableCell Tc;
		

		//*** Create Header ***//

		//*** New Rows ***//
        Tr = new TableRow();

		//*** New Cell (Header CustomerID) ***//
        Tc = new TableCell();
        //Tc.BorderColor = Drawing.Color.Black();
        Tc.BorderWidth = 1;
        Label lblHeadCustomerID = new Label();
        lblHeadCustomerID.Text = "CustomerID";
		lblHeadCustomerID.Font.Bold = true;

        Tc.Controls.Add(lblHeadCustomerID);  //*** Add lblHeadCustomerID To Cell ***//
        Tr.Cells.Add(Tc); //*** Add Cell To Rows ***//

		//*** New Cell (Header Name) ***//
        Tc = new TableCell();
        //Tc.BorderColor = Drawing.Color.Black();
        Tc.BorderWidth = 1;
        Label lblHeadName = new Label();
        lblHeadName.Text = "Name";
		lblHeadName.Font.Bold = true;

        Tc.Controls.Add(lblHeadName);  //*** Add lblHeadName To Cell ***//
        Tr.Cells.Add(Tc); //*** Add Cell To Rows ***//

		//*** New Cell (Header Email) ***//
        Tc = new TableCell();
        //Tc.BorderColor = Drawing.Color.Black();
        Tc.BorderWidth = 1;
        Label lblHeadEmail = new Label();
        lblHeadEmail.Text = "Email";
		lblHeadEmail.Font.Bold = true;

        Tc.Controls.Add(lblHeadEmail);  //*** Add lblHeadEmail To Cell ***//
        Tr.Cells.Add(Tc); //*** Add Cell To Rows ***//

		//*** New Cell (Header CountryCode) ***//
        Tc = new TableCell();
        //Tc.BorderColor = Drawing.Color.Black();
        Tc.BorderWidth = 1;
        Label lblHeadCountryCode = new Label();
        lblHeadCountryCode.Text = "CountryCode";
		lblHeadCountryCode.Font.Bold = true;

        Tc.Controls.Add(lblHeadCountryCode);  //*** Add lblHeadCountryCode To Cell ***//
        Tr.Cells.Add(Tc); //*** Add Cell To Rows ***//

		//*** New Cell (Header Budget) ***//
        Tc = new TableCell();
        //Tc.BorderColor =  Drawing.Color.Black();
        Tc.BorderWidth = 1;
        Label lblHeadBudget = new Label();
        lblHeadBudget.Text = "Budget";
		lblHeadBudget.Font.Bold = true;

        Tc.Controls.Add(lblHeadBudget);  //*** Add lblHeadBudget To Cell ***//
        Tr.Cells.Add(Tc); //*** Add Cell To Rows ***//

		//*** New Cell (Header Used) ***//
        Tc = new TableCell();
        //Tc.BorderColor =  Drawing.Color.Black();
        Tc.BorderWidth = 1;
        Label lblHeadUsed = new Label();
        lblHeadUsed.Text = "Used";
		lblHeadUsed.Font.Bold = true;

        Tc.Controls.Add(lblHeadUsed);  //*** Add lblHeadUsed To Cell ***//
        Tr.Cells.Add(Tc); //*** Add Cell To Rows ***//