BOS：锁定单元格方法

栏目：k3wise知识作者：金蝶来源：金蝶云社区发布：2024-09-16浏览：1

BOS：锁定单元格方法

Public Sub LockOneCell(ByRef m_BillInterface As Object, ByVal sKey As String, _

ByVal nRow As Long, Optional ByVal bValue As Boolean = True)

Dim dctCtl As KFO.Dictionary

Set dctCtl = m_BillInterface.GetFieldInfoByKey(sKey, "", 0)

m_BillInterface.LockCell dctCtl, nRow, bValue

Set dctCtl = Nothing

End Sub

单据头：Call LockOneCell(m_BillInterface, "FVersion", -1, True)；

单据体：Call LockOneCell(m_BillInterface, "FStockID", i, True)；

本文2024-09-16 17:05:37发表“k3wise知识”栏目。
本文链接：https://wenku.my7c.com/article/kingdee-k3wise-13477.html

阅读排行