how to automatically add more rows in a datagrid on button click

[indiewolf]

i want to make a table with five columns in form1

first name last name title phone email

the information ie the rows would be filled based on data in another form say form 2 which has all these informations in 5 textboxes.
in the form2 there will be a button to add all the information of the five textboxes into the form1 table under each column.

how do i go about it.

will i have to use datagrid ,dataview, if yes how ?


kindly help
cheers

[indiewolf]

please help.
i dragged a datagrid.
created a button in the other form but how do i export data from textboxes in one form to a table in another form?

[jmcilhinney]

Read the "Forms in VB.NET" tutorial in my signature.

[indiewolf]

thanks j
i have read, and used that before.
but i am confused as to how will i communicate with the tables (datagrid)
when i press the button in form2 , with my motto being to transfer values of textboxes in form2 to this datagrid in form1.

kindly help
cheers

[indiewolf]

ok i am able to communicate now.

but the problem is wheni click the button after entering the values once they are displayed on the datagrid. fine...but when i enter new values in the textbox and click the button those values are updated.
ie instead of printing the values in the second row the values are printed in the first row.

ie only the first row is getting updated.wheras values should be added in different rows.

kindly help
cheers

[indiewolf]

this is my code

Dim Table1 As DataTable
        Table1 = New DataTable("Contacts")
        'creating a table named contacts
        ' DataGrid1.ReadOnly = True
        'so that no changes are made to the data grid
 
        Dim Row1, Row2, Row3, Row4, Row5 As DataRow
        'declaring five rows for the table
        Try
            Dim Name As DataColumn = New DataColumn("First Name")
            'declaring a column named First Name
            Name.DataType = System.Type.GetType("System.String")
            'setting the datatype for the column
            Table1.Columns.Add(Name)
            'adding the column to table
            Dim Last As DataColumn = New DataColumn("Last Name")
            Last.DataType = System.Type.GetType("System.String")
            Table1.Columns.Add(Last)
            Dim Title As DataColumn = New DataColumn("Title")
            Title.DataType = System.Type.GetType("System.String")
            Table1.Columns.Add(Title)
 
            Dim phone As DataColumn = New DataColumn("Phone")
            phone.DataType = System.Type.GetType("System.String")
            Table1.Columns.Add(phone)
 
            Dim Email As DataColumn = New DataColumn("Email")
            Email.DataType = System.Type.GetType("System.String")
            Table1.Columns.Add(Email)
 
 
 
            Row1 = Table1.NewRow()
            'declaring a new row
            Row1.Item("First Name") = TextBox3.Text
            'filling the row with values. Item property is used to set the field value.
            Row1.Item("Last Name") = TextBox4.Text
            'filling the row with values. adding Last Name
            Row1.Item("Title") = TextBox2.Text
            'filling the row with values. adding a title
            Row1.Item("Phone") = TextBox5.Text
            'filling the row with phone number
            Row1.Item("Email") = TextBox6.Text
 
            'filling the row with email id
            Table1.Rows.Add(Row1)
            'adding the completed row to the table
 
        Catch
        End Try
        Dim ds As New DataSet
        ds = New DataSet
        'creating a dataset
        ds.Tables.Add(Table1)
        'adding the table to dataset 
        f1.DataGrid1.SetDataBinding(ds, "Contacts")
        'binding the table to datagrid
  
 
 
        f1.Show()

the data in textboxes is added to datagrid1 in form1
now when i write fresh data to textboxes and click the button the first row is rewritten, but i wanted the first row to remain as it is and the data to go to the second row.
what should i do?

kindly help
cheers

[jmcilhinney]

You are creating a completely new DataTable that has no knowledge of any previous data. If you want to keep the original data then you have to use the original DataTable and add the new data to it. Let's say that you had a piece of paper and wrote "Hello" on it. If you then got a new piece of paper and wrote "Goodbye" on it, would you be surprised that it only had "Goodbye" and not "Hello"? If you wanted "Hello" and "Goodbye" then you'd have to write them on the same piece of paper. Same applies here. If you want both the old record and new record then you have toput them in the same DataTable.

[indiewolf]

i do understand that.
but the prob is when i remove the "new datatable2 code bit
it gives me error.


i get error when i click the button. the error is in the code u gave me for changing the width of the column.
the error is here :

visual basic code:--------------------------------------------------------------------------------

ds.Tables.Add(Table1)

--------------------------------------------------------------------------------

Quote:
Additional information: 'table' argument cannot be null.



my full code now is :

this is under the button click event in form2.


visual basic code:--------------------------------------------------------------------------------

Dim Table1 As DataTable
        'Table1 = New DataTable("Contacts")
 
 
        'creating a table named contacts
        f1.DataGrid1.ReadOnly = True
        'so that no changes are made to the data grid
 
        Dim Row1, Row2, Row3, Row4, Row5 As DataRow
        'declaring five rows for the table
        Try
            Dim Name As DataColumn = New DataColumn("First Name")
            'declaring a column named First Name
            Name.DataType = System.Type.GetType("System.String")
            'setting the datatype for the column
            Table1.Columns.Add(Name)
            'adding the column to table
            Dim Last As DataColumn = New DataColumn("Last Name")
            Last.DataType = System.Type.GetType("System.String")
            Table1.Columns.Add(Last)
            Dim Title As DataColumn = New DataColumn("Title")
            Title.DataType = System.Type.GetType("System.String")
            Table1.Columns.Add(Title)
 
            Dim phone As DataColumn = New DataColumn("Phone")
            phone.DataType = System.Type.GetType("System.String")
            Table1.Columns.Add(phone)
 
            Dim Email As DataColumn = New DataColumn("Email")
            Email.DataType = System.Type.GetType("System.String")
            Table1.Columns.Add(Email)
 
 
 
            Row1 = Table1.NewRow()
            'declaring a new row
            Row1.Item("First Name") = TextBox3.Text
            'filling the row with values. Item property is used to set the field value.
            Row1.Item("Last Name") = TextBox4.Text
            'filling the row with values. adding Last Name
            Row1.Item("Title") = TextBox2.Text
            'filling the row with values. adding a title
            Row1.Item("Phone") = TextBox5.Text
            'filling the row with phone number
            Row1.Item("Email") = TextBox6.Text
 
            'filling the row with email id
            Table1.Rows.Add(Row1)
 
            f1.DataGrid1.Refresh()
            'adding the completed row to the table
        Catch
        End Try
        Dim ds As New DataSet
        ds = New DataSet
 
        'creating a dataset
        ds.Tables.Add(Table1)
        'adding the table to dataset 
        f1.DataGrid1.SetDataBinding(ds, "Contacts")
        'binding the table to datagrid
 
 
 
        ' for resizing the column width of datagrid
 
        'Clear the table styles for the datagrid
        f1.DataGrid1.TableStyles.Clear()
 
        'Declare local variables
        Dim tsTableStyle As New DataGridTableStyle
        Dim tcTextCol As DataGridTextBoxColumn
        Dim intCounter As Integer
 
        'Map the table style to the table in the dataset
        tsTableStyle.MappingName = ds.Tables(0).TableName()
 
        'Add textbox column style for each column in the dataset 
        For intCounter = 0 To ds.Tables(0).Columns.Count() - 1
 
            'Reinstantiate the text box column and set mappings and attributes
            tcTextCol = New DataGridTextBoxColumn
            tcTextCol.MappingName = ds.Tables(0).Columns.Item(intCounter).ColumnName
            tcTextCol.HeaderText = ds.Tables(0).Columns.Item(intCounter).ColumnName
 
            'Set column size based on name
            Select Case tcTextCol.MappingName()
                Case "First Name"
                    tcTextCol.Width() = 90
                Case "Last Name"
                    tcTextCol.Width() = 90
                Case "Title"
                    tcTextCol.Width() = 40
                Case "Phone"
                    tcTextCol.Width() = 100
                Case "Email"
                    tcTextCol.Width() = 180
 
 
                Case Else
                    tcTextCol.Width() = 0
            End Select
 
 
 
            'Add the column to the table style
            tsTableStyle.GridColumnStyles.Add(tcTextCol)
        Next
        'Add the table styles to the datagrid
        f1.DataGrid1.TableStyles.Add(tsTableStyle)
 
 
        f1.Show()

[indiewolf]

kindly help
still stuck.

cheers

[jmcilhinney]

You still have to create a DataTable, but you only create one DataTable. You don't create a new one every time.

[indiewolf]

You still have to create a DataTable, but you only create one DataTable. You don't create a new one every time.

but i removed the code for the new datatable?