- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 能帮帮搜索代码吗？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=52110)
-- 发布时间：2014/6/9 13:57:00
-- 能帮帮搜索代码吗？
感谢！感谢
如果只是搜索到第一列的ComboBox5里面的数据，不是把他筛选出来应该怎么改一下啊！
Tables("表A").Filter = "第一列 Like \'%" & e.Form.Controls("ComboBox5").Text & "%\'"
现在是搜索到 并且筛选出来了，有没办法 不筛选出来 只是只是选择ComboBox5相同的行！感谢 感谢
-- 发布时间：2014/6/9 14:03:00
--
什么叫做选择，选择是什么效果，又怎么用。
-- 发布时间：2014/6/9 14:07:00
--
就是鼠标移到搜索到的那行，点击一下的效果
不单独筛选，
-- 发布时间：2014/6/9 14:09:00
--
无法理解你的意思.
-- 发布时间：2014/6/9 14:14:00
--
不好意思 ！
比如用控件"ComboBox5"在第一列搜索123，搜索到了，鼠标点击第一列的123那行！
感谢 感谢 不好意思 专业知识不够！有些不知道该怎么说！
-- 发布时间：2014/6/9 14:15:00
--
你的意思是不进行筛选,只是移动焦点要对应的行?
参考帮助
-- 发布时间：2014/6/9 14:33:00
--
感谢 感谢
可以了
-- 发布时间：2014/6/13 10:27:00
--
能在帮忙看看吗 ？ 感谢 感谢
With CurrentTable
Dim C As Integer
C = .FindRow("[No] Like \'%" & e.Form.Controls("ComboBox1").Text & "%\'") \'从 第一行开始查找
If C >= 0 Then \'如果找到的话
.Position = C \'定位到找到的行.
End If
End With
No 是双精度小数 就要报警 能帮帮忙看看吗？
-- 发布时间：2014/6/13 10:28:00
--
With CurrentTable
Dim C As Integer
C = .FindRow("[Convert(No], \'System.String\') Like \'*" & e.Form.Controls("ComboBox1").Text & "*\'") \'从 第一行开始查找
If C >= 0 Then \'如果找到的话
.Position = C \'定位到找到的行.
End If
End With
-- 发布时间：2014/6/13 10:41:00
--
感谢
