查找老单字段索引值方法
'表头字段i从0开始
For i = 0 To UBound(m_BillTransfer.HeadCtl)
If UCase(m_BillTransfer.HeadCtl(i).FieldName) = UCase("FDate") Then
djrqcol = i
Exit For
End If
If UCase(m_BillTransfer.HeadCtl(i).FieldName) = UCase("FHeadSelfS0152") Then
tscol = 47
Exit For
End If
Next
'表体字段i从1开发
For i = 1 To UBound(m_BillTransfer.EntryCtl)
If UCase(m_BillTransfer.EntryCtl(i).FieldName) = UCase("FItemID") Then
itemcol = i
Exit For
End If
If UCase(m_BillTransfer.EntryCtl(i).FieldName) = UCase("Fdate") Then
jhrqcol = i
Exit For
End If
Next
查找老单字段索引值方法
'表头字段i从0开始For i = 0 To UBound(m_BillTransfer.HeadCtl) If UCase(m_BillTransfer.HeadCtl(i).FieldName) = UCase("F...
点击下载文档
本文2024-09-22 16:40:07发表“k3wise知识”栏目。
本文链接:https://wenku.my7c.com/article/kingdee-k3wise-89422.html
您需要登录后才可以发表评论, 登录登录 或者 注册
最新文档
热门文章