Sunny's Technology Blog

书山有路勤为径,学海无涯苦作舟

博客园 首页 新随笔 联系 订阅 管理
'动态添加Web控件
Dim btnAdd As New Button
btnAdd.ID 
= "btnAdd"
btnAdd.Text = "New Button"
Me.Panel1.Controls.Add(btnAdd)

'动态添加用户控件
Dim uc As UC1
uc 
= CType(LoadControl("uc1.ascx"), UC1)
Me.Panel1.Controls.Add(uc)
posted on 2005-08-12 13:18  Sunny  阅读(746)  评论(1编辑  收藏  举报