以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  以下代码如何定位到第10列输入数据  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=116090)

--  作者:mxy8898
--  发布时间:2018/3/19 20:27:00
--  以下代码如何定位到第10列输入数据

如果当前表页面在表A中,按钮新建 代码以下配置可以定位到要输入的位置正确输入,如果当前页面不在表A中,而是打开其他表,下面代码提示错误

 

With CurrentTable
    Dim r As Integer
    r = .FindRow("钾_第10 Is Null") \'从第一行开始查找
    If r >= 0 Then \'如果找到的话
        .Position = r \'定位到找到的行.
    End If
End With

 

 

错误内容:

.NET Framework 版本:2.0.50727.8669
Foxtable 版本:2018.3.9.1
错误所在事件:窗口,系统菜单,Button2,Click
详细错误信息:
未找到列 [钾_第10]。

 

怎么增加代码才可以让新建按钮自动识别到表A然后执行以上代码。



--  作者:有点蓝
--  发布时间:2018/3/19 20:32:00
--  
使用具体表名

With CurrentTable
改为
With Tables("表A")

--  作者:mxy8898
--  发布时间:2018/3/19 20:50:00
--  
哈,马上大功告成。可以了,非常感谢。