
Developing Web Applications • Chapter 10 499
8. Place the following code inside the class:
Protected Overrides Sub CreateChildControls()
'adding Para
Me.Controls.Add(New LiteralControl("<p>"))
'adding title
Dim lblCustomerOrder As New Label()
lblCustomerOrder.Text = "Customer Order Details"
lblCustomerOrder.Font.Size = FontUnit.XLarge
Me.Controls.Add(lblCustomerOrder)
'closing para
Me.Controls.Add(New LiteralControl("</p>"))
'adding Para
Me.Controls.Add(New LiteralControl("<p>"))
'adding Label control
Dim lblCustomerID As New Label()
lblCustomerID.Text = "CustomerID"
lblCustomerID.Font.Bold = True
Me.Controls.Add(lblCustomerID)
'adding Text Box
Dim txtCustomerID ...