Load Dim conn As Sql Connection Dim str Conn As String Dim str SQL As String Dim da As Sql Data Adapter str Conn = "Server = (local);" str Conn &= "Database = North Wind;" str Conn &= "Integrated Security = SSPI;" conn = New Sql Connection(str Conn) da = New Sql Data Adapter("Select * From Products", conn) da. Table Name Dim col Discontinued As New Data Grid Bool Column With col Discontinued .

Width = 80 End With Dim col Name As New Data Grid Text Box Column With col Name .

New() Column Combo Box = New No Key Up Combo Add Handler Column Combo Box.

I have to put focus back on that cell and then leave again to get the new value to display. Or is there an event I should fire to cause the cell to update???

I have trued calling the Update(), Update Cell(column, row)...

Selected Index) End If Return True End Function Private Sub Combo Start Editing(By Val sender As Object, By Val e As Event Args) is Editing = True My Base.

Focus() End Sub Protected Overloads Overrides Function Commit(By Val data Source As _ Currency Manager, By Val row Num As Integer) As Boolean If is Editing Then is Editing = False Set Column Value At Row(data Source, row Num, Column Combo Box.

Row Deleted, _ New Data Row Change Event Handler(Address Of Row_Delete)Private Sub Row_Delete(By Val sender As Object, By Val e _ As Data Row Change Event Args) If e.

er and changing the value of the cell, but the display is not updating immediately with the new value...

Add(ts) ts = Nothing col Discontinued = Nothing col Name = Nothing Data Grid1. Tables("Products") End Sub Private Sub Cell Validating(By Val sender As Object, By Val e As System.

Write Line(Direct Cast(sender, Data Grid Text Box).

Load Data Row(New Object() , True) 'above only to build a sample datatable dt.