vsflexgrid怎么显示数组数据
1个回答
展开全部
如何实现将vsflexgrid中修改的数据反馈到数据库中?
Private Sub vsflexgrid1_AfterEdit(ByVal Row As Long, ByVal Col As Long)
rs.MoveFirst '//rs为记录集
rs.Move vsflexgrid1.Row - 1
rs.Edit
If vsflexgrid1.text = "" Then
rs.Fields(vsflexgrid1.Col - 1) = Null
Else
rs.Fields(vsflexgrid1.Col - 1) = vsflexgrid1.text
End If
rs.Update
end sub
Private Sub vsflexgrid1_AfterEdit(ByVal Row As Long, ByVal Col As Long)
rs.MoveFirst '//rs为记录集
rs.Move vsflexgrid1.Row - 1
rs.Edit
If vsflexgrid1.text = "" Then
rs.Fields(vsflexgrid1.Col - 1) = Null
Else
rs.Fields(vsflexgrid1.Col - 1) = vsflexgrid1.text
End If
rs.Update
end sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询