- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- table中查找Find不能查高精度类型的数据吗?2.隐藏菜单 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=126349)
-- 发布时间：2018/10/19 9:53:00
-- table中查找Find不能查高精度类型的数据吗?2.隐藏菜单
老师，1.我有一列是高精度小数，用Find无法定位，是不是只能定位字符型？这列在基准值列肯定存在的，眼睛都能找到
With Tables("MSA信号探测法子表")
Dim r As Integer
r = .Find(“0.5599180000”, 0, "基准值", False, False, True) //高精度列，显示值为0.559918，弹出值为后面加了几个0
MessageBox.Show(r)
If r > - 1 Then \'如果找到符合条件的行
.Position = r \'则选择该行
End If
End With
2.有个菜单代码执行需要很长时间，但执行中，菜单下拉打来后，就漂浮在界面上，如果代码不执行完毕，他一直停留在主界面上，遮住数据，如何隐藏？
此主题相关图片如下：菜单置于下方.png
此主题相关图片如下：菜单置于下方.png-- 发布时间：2018/10/19 10:08:00
--
1、
r = .Find(“0.559918”, 0, "基准值", False, False, True)
或者
r = .Findrow(“基准值=0.559918”)
2、
Select Case e.StripItem.Name
Case "正式"
Dim sit As WinForm.StripItem = e.Form.Strips("工具栏1").Items("基本")
sit.basecontrol.HideDropDown \'隐藏子菜单
‘原来的其他事件代码
End Select