Dynamically Adding Controls to a Web Page...

王朝c#·作者佚名  2006-12-17
宽屏版  字体:  |  |  | 超大  

Date: April 5, 2003
Download the code.
Printer Friendly Version

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">

<html>

<head>

<title>DynamicDropDowns</title>

<meta name="GENERATOR" content="Microsoft Visual Studio.NET 7.0">

<meta name="CODE_LANGUAGE" content="Visual Basic 7.0">

<meta name=vs_defaultClientScript content="JavaScript">

<meta name=vs_targetSchema content="http://schemas.microsoft.com/intellisense/ie5">

</head>

<body MS_POSITIONING="GridLayout">

<form id="Form1" method="post" runat="server">

<h4>Enter Number of DropDownLists:</h4>

<asp:TextBox ID="txtNumControls" Runat="server" />

<asp:Button ID="btnControls" Text="OK" OnClick="btnControls_Click" Runat="server" />

</form>

</body>

</html>

Protected WithEvents txtNumControls As System.Web.UI.WebControls.TextBox

Protected WithEvents btnControls As System.Web.UI.WebControls.Button

Protected WithEvents Form1 As System.Web.UI.HtmlControls.HtmlForm

Public Sub btnControls_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)

Dim I, J As Integer

For I = 1 to txtNumControls.Text

Dim ctrlDropDown = New System.Web.UI.WebControls.DropDownList

ctrlDropDown.ID = "ddlDynamic" & I

For J = 1 To 4

Dim listItem As New System.Web.UI.WebControls.ListItem

listItem.Text = "DropDownList " & I & " : " & J

ctrlDropDown.Items.Add(listItem)

Next

Dim literalControl = New System.Web.UI.LiteralControl

literalControl.Text = "<p>"

form1.Controls.Add(literalControl)

form1.Controls.Add(ctrlDropDown)

Next

End Sub

End Class

You may download the code here.

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
© 2005- 王朝网络 版权所有