此主题相关图片如下:丢失数据.png
![dvubb 图片点击可在新窗口打开查看](UploadFile/2024-5/20245249181917603.png)
由于是MYSQL源,设定下面代码一:
'表属性-StartEdit开始编辑的时候执行
Dim dmp As New TableDataMap
dmp.DataTable = "窗口_Table3" '
dmp.ValueCol = "计量单位" '
dmp.DisplayCol = "计量单位" '
dmp.ListCols = "计量单位"
Tables("窗口_Table2").Cols("单位").DataMap = dmp.CreateDataMap() '生成并设置DataMap
Dim dmp As New TableDataMap
dmp.DataTable = "窗口_Table3" '
dmp.ValueCol = "等级" '
dmp.DisplayCol = "等级" '
dmp.ListCols = "等级"
Tables("窗口_Table2").Cols("等级").DataMap = dmp.CreateDataMap() '生成并设置DataMap
执行下面代码后,有时,表的中“单位”会丢失,有时,在手动录入,数量列的值时,表的中“单位”会丢失,有时正常,如何解决?
Dim nma() As String = {"产品编号", "品名", "单位"}'
Dim nmb() As String = {"产品编号", "品名", "单位"} '
Dim dr As Row = Tables("窗口_Table2").AddNew '
For i As Integer = 0 To nma.Length - 1
dr(nmb(i)) = r(nma(i))
Next
Else
End If
Next
Forms("导记窗口").Close()''
[此贴子已经被作者于2024/5/24 9:39:50编辑过]