编译错误，缺少：=

Question

Private Sub m_BillInterface_AfterSave(bCancel As Boolean)
m_BillInterface.LockCell( m_BillInterface.GetFieldInfoByKey("FFactAccQty", "FFactAccQty", 10), -1, True)
End Sub我把以上代码去掉外面的括号，如下：Private Sub m_BillInterface_AfterSave(bCancel As Boolean)m_BillInterface.LockCellm_BillInterface.GetFieldInfoByKey("FFactAccQty", "FFactAccQty", 10), -1, True
End Sub就正常了，这是为什么。
'其中LockCell 方法，Object.LockCell (dct As Dictionary, Row As Long, bValue As Boolean) 返回值 无
'GetFieldInfoByKey 函数，Object.GetFieldInfoByKey (sKey As String, sPKey As String, lIndex As Long)
'返回值 KFO.Dictionary

Answer 1

有括号是函数，不加=，可以加call
Call MsgBox("ok")没有括号是方法

Answer 2

m_BillInterface.LockCell( m_BillInterface.GetFieldInfoByKey("FFactAccQty", "FFactAccQty", 10), -1, True)
方法在调用的时候，如果要加 括号一定要在前面加上 CALL 或进行赋值语句，即等号。如果只是想执行语句，就不能加上括号。