新增文章
文章标题
分类
C#
云星空
K3 BOS
K3 功能
用友
Oracle
python
SQL
MySql
PHP
HTML
script
windows
Access
影视后期
财务
服务
生活
内容
Private Sub m_BillInterface_BeforeSave(bCancel As Boolean) '保存前 ★ aCount = m_BillInterface.Data("Page3").UBound For i = 1 To aCount a1 = aCount + 1 - i aValue = m_BillInterface.GetDataFldbyKey("FText3", a1)("FFLD") '【字段值】 3 FText3 工序名称 FProcess If Len(aValue) = 0 Then m_BillInterface.RemoveRow False, 3, a1 '删除空行 End If Next End Sub
返回
保存