老师好,节日愉快!我有个表80000行数据,资产代码是从资产代码库中自动索引,我在datachanged中输入了代码,单个输入没有问题,我重置列就死机,请高手教我如何在命令窗口或直接用SQL语句学习,谢谢!
If e.DataCol.Name = "资产分类名称" Then '当前表 当前列的名字固定了
For Each shujuyuan As Row In Tables("资产分类代码表").Rows '在【数据源】表的所有行中去找
If e.DataRow("资产分类名称") = shujuyuan("资产分类") Then '如果当前行的某个值和数据源表的某个值相符合
e.DataRow("资产分类代码") = shujuyuan("四级代码") '数据源的第一个赋值
e.DataRow("卡片类型") = shujuyuan("一级代码名称") '数据源的第二个赋值
Exit For '这个很关键,如果不结束,就会一直找到最后面,
Else
e.DataRow("资产分类代码") = Nothing '数据源的第一个赋值
e.DataRow("卡片类型") = Nothing '数据源的第二个赋值
End If
Next
End If