学会调试
Rows8 = tbl8.DataTable.Select("企业名称 Like '*" & e.Form.controls("目标考核奖惩企名").value & "*' And 年度 Like '*" & e.Form.controls("目标考核奖惩年度").value & "*' and 考核日期 >= #" & e.Form.controls("目标考核奖惩考核日期起").value & "# and 考核日期 <= #" & e.Form.controls("目标考核奖惩考核日期止").value & "# And 被考核部门 Like '*" & e.Form.controls("目标考核奖惩部门").value & "*' And 被考核岗位 Like '*" & e.Form.controls("目标考核奖惩岗位").value & "*' And 被考核人 Like '*" & e.Form.controls("目标考核奖惩被考核人").value & "*'","年度,考核日期") '指定符合条件的行和排序方式
msgbox(Rows8.count) '查询结果有几行？
另外把like里的*改为%
加好友 
发短信
Post By：2021/10/10 20:27:00 [显示全部帖子]
