как добавить новые строки в datatable vb.net

Question

У меня есть форма с текстовым полем и кнопкой добавления.

1. пользователь может записать имя в текстовое поле и нажать кнопку «Добавить».он будет сохранен в виде данных с автоматическим идентификатором.
2. после этого текстовое поле очищается, и пользователь может написать другое имя в текстовом поле и нажать кнопку.
3. это должно добавить к существующей таблице данных в памяти с существующим идентификатором + 1.
4. показать в виде сетки.(это только для того, чтобы показать, что это работает)

У меня есть данные, подобные этой.

    Button1.click() event

    Dim name = txtname.Text
    Dim dt As New DataTable
    dt.Columns.Add("ID", GetType(Integer))
    dt.Columns.Add("Name", GetType(String))
    Dim N As Integer = dt.Columns("ID").AutoIncrement
    dt.Rows.Add(N, name)
    GridView1.DataSource = dt
    GridView1.DataBind()
    txtname.Text = ""

На данный момент у меня есть время, похожее на код выше.в реальной программе это не просто имя и не просто один набор данных, поэтому я просто макетирую некоторый код.

и этот код для aspx.

        <asp:TextBox ID="txtname" runat="server">
        </asp:TextBox><asp:Button ID="Button1" runat="server" Text="Button" />
        <asp:GridView ID="GridView1" runat="server">
        </asp:GridView>

может кто-нибудь посоветовать мнекак это сделать ?Я понимаю, что мой код испорчен и не верен, но мне просто нужно добавить код, чтобы вам, ребята, не приходилось работать с нуля для меня.

Большое спасибо.

Answer 1

Вот пример добавления новой строки в таблицу данных, которая использует автоинкремент в первом столбце:

Определение структуры таблицы:

    Dim dt As New DataTable
    dt.Columns.Add("ID")
    dt.Columns.Add("Name")
    dt.Columns(0).AutoIncrement = True

Добавление новой строки:

    Dim R As DataRow = dt.NewRow
    R("Name") = txtName.Text
    dt.Rows.Add(R)
    DataGridView1.DataSource = dt

Answer 2

Сначала необходимо определить структуру таблицы данных следующим образом:

Dim dt As New DataTable
dt.Columns.Add("ID", Type.GetType("System.String"))
dt.Columns.Add("Name",Type.GetType("System.String"))

И затем добавить строку, например:

Dim dr As DataRow = dt.NewRow
dr("ID") = System.GUID.NewGUID()
dr("Name") = txtName.Text
dt.Rows.Add(dr)
DataGridView1.DataSource = dt
DataGridView1.DataBind()