If Trim(OleDsField.Tables("Field").Rows(i).Item("column_enable")) = "是" Then

                        mytextbox.Enabled = True

                    Else

                        mytextbox.Enabled = False

                    End If

                    c2.Controls.Add(mytextbox)

                    r.Cells.Add(c2)

                    Table3.Rows.Add(r)

              Next

    这样就成功地添加了两列到表里，至于行数由变量IntRowCount决定，其中IntRowCount为取数据库时得到的记录的行数

3.       使用动态创建的控件

    使用这些控件时，首先必须要知道这些控件的ID，对于上文所说的这些控件，由于ID名称不定，使用时必须也要根据条件来使用。比如我要找到相应的文本框的ID，就用以下代码可以实现：

Dim txt As TextBox

            txt = Me.FindControl("txt" & OleDsField.Tables("Field").Rows(i).Item_

("column_name"))

   这样就找到了要使用的文本框的这个控件，然后就可以使用相应功能。

4.       小结

   使用动态创建控件时，难点在于怎么来操作这些动态创建的控件。本文给出了代码，本文例子在.net 2002+windows 2000下调试通过。同时也给出了web设计的一个方法，各位可以通过l_yx123@sina.com.cn和我联系，欢迎批评指正。

上一页  [1] [2]