回复：（有点甜）以下是引用湛江智在2018/8/3 14:06:0... Post By：2018/8/3 15:35:00 [只看该作者]
因为编码只显示最后2位，下面目录树对表筛选报错，代码怎么修改呢？ Dim trv As WinForm.TreeView = e.Form.Controls("部门档案.tv") If e.Node.Name = "全部" Then Tables("部门档案").Filter = "" Else Tables("部门档案").Filter = "编码规则 Like '" & e.Node.name & "%'" End If
加好友 
发短信
Post By：2018/8/3 15:35:00 [只看该作者]
