那我在用
Dim bs As New BindingSource
Dim myds As New DataSet
DataGV.DataSource = DBNull.Value
Dim mydr As New SqlDataAdapter(str, DB.myDBConn)
mydr.Fill(myds)
bs.DataSource = myds.Tables(0)
DataGV.DataSource = bs
Bind.BindingSource = bs
就变成了在datagridview 上新增一行了
1. 我用 Me.DataGVCaiPinType.Columns.Insert(0, New DataGridViewCheckBoxColumn())
可是这样的话就是在datagridveiw中新增一列
2.如果我用datagridview上角点击那个小三角中的"编辑列"的话,,可是我的数据是通过
Public Sub DataOpenBd(ByVal str As String, ByVal DataGV As DataGridView, ByVal Bind As BindingNavigator)
Dim bs As New BindingSource
Dim myds As New DataSet
Try
DataGV.DataSource = DBNull.Value
Dim mydr As New SqlDataAdapter(str, DB.myDBConn)
mydr.Fill(myds)
bs.DataSource = myds.Tables(0)
DataGV.DataSource = bs
Bind.BindingSource = bs
Catch ex As Exception
MessageBox.Show("加载数据出错了...", DB.StrName, MessageBoxButtons.OK)
End Try