Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim i As Integer
For i = 1 To 3
'*** Create New textbox ***'
Dim txtbox As New TextBox
With txtbox
.Text = "My Customer"
.Font.Size = "10"
End With
Me.pnlMain1.Controls.Add(txtbox)
Response.Write(txtbox)
Next
End Sub
Tag : .NET, Ms SQL Server 2008, Ajax, Web (ASP.NET), VB.NET, Windows
private myTextBox As New Textbox()
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
End Sub
Sub Page_Init (ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Init
With myTextBox
.Text = "My Customer"
.Font.Size = "10"
End With
Me.pnlMain1.Controls.Add(myTextBox )
End Sub
End Sub