以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  关于菜单设计  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=87861)

--  作者:lk15502
--  发布时间:2016/7/21 15:04:00
--  关于菜单设计
图片点击可在新窗口打开查看       
Dim a As RibbonMenu.TextBox = RibbonTabs("成品库仓管")("数据查询")("缸号").value
With CurrentTable
    Dim r As Integer
    r = .findrow("[缸号] like \'%a%\'")
    If r >= 0 Then
        .position = r
    End If
End With

.NET Framework 版本:2.0.50727.5485
Foxtable 版本:2016.5.13.1
错误所在事件:菜单,查找缸号,Click
详细错误信息:
未找到类型“TextBox”的公共成员“value”。 

--  作者:大红袍
--  发布时间:2016/7/21 15:27:00
--  
Dim a As String = RibbonTabs("成品库仓管")("数据查询")("缸号").Text
With CurrentTable
    Dim r As Integer
    r = .findrow("[缸号] like \'%" & a & "%\'")
    If r >= 0 Then
        .position = r
    End If
End With

--  作者:lk15502
--  发布时间:2016/7/21 15:36:00
--  
谢谢红袍老师,可以了,怎么把光标定位到找到缸号列的位置
--  作者:Hyphen
--  发布时间:2016/7/21 16:47:00
--  
参考http://www.foxtable.com/webhelp/scr/0550.htm