以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  保存数据时出错  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=103526)

--  作者:peibaomin
--  发布时间:2017/7/10 22:12:00
--  保存数据时出错

声明了一个公共布尔变量
jinzhihangjianyidong

 我在BeforeSelChange 事件里编写了如下代码:


If jinzhihangjianyidong = False Then
    If e.OldRange.RowSel <> e.NewRange.RowSel \'如果选择的是不同的行
        e.Cancel=True  \'取消改变行
  msgbox("数据已经修改,请先保存在移动行")
End If
    End If


在添加按钮单击事件编写了如下代码:

Tables("客户资料").AddNew
jinzhihangjianyidong= True

 

不知道为什么单击添加按钮后只要客户姓名填上数据后就输入焦点就不能移动到其他文本框中否则弹出一下对话框,单击很多次后才退出此框。

 

如果客户姓名是空值不过其他文本框有数据还是无数据移动输入焦点都不会没出错。

我将该表和该窗体导出单独运行时正常

尝试找错的地方,一直找不到,出现这种现象应该是哪里错了?麻烦老师给看看


此主题相关图片如下:aaaa.png
按此在新窗口浏览图片

--  作者:有点蓝
--  发布时间:2017/7/10 22:27:00
--  
检查什么地方把jinzhihangjianyidong值改为false的,应该是有其他的代码影响了
--  作者:peibaomin
--  发布时间:2017/7/10 22:37:00
--  

添加按钮单击事件的改为jinzhihangjianyidong = True 是不出来了,但想实现添加数据时不能行间移动。为什么导出表和窗体单独调试没错呀。应该是哪的问题呀?我每个事件都找了都没找到应该是哪的事


--  作者:有点蓝
--  发布时间:2017/7/10 22:38:00
--  
上传实例说明。
--  作者:裴保民
--  发布时间:2017/7/11 8:35:00
--  
就是一个按钮点击事件没有别
--  作者:有点甜
--  发布时间:2017/7/11 8:55:00
--  

BeforeSelChange 加入代码弹出,是哪个表触发的

 

msgbox(e.Table.name)

 

如果有设置关联,试试把关联删除一下。

 

实在不行,就做个具体的例子发上来看看。


--  作者:裴保民
--  发布时间:2017/7/11 9:06:00
--  
有两个关联表。我将该表和窗体导出单独运行没出错。不知道是哪的原因
--  作者:有点甜
--  发布时间:2017/7/11 9:09:00
--  

msgbox(e.Table.name) 弹出什么?

 

把关联删除后,是否还有问题?


--  作者:peibaomin
--  发布时间:2017/7/11 12:18:00
--  

 

输入焦点在行和列改变时都弹出下提示框,我设置的只是行间变化时才弹出这个框不知道拿错啦?


图片点击可在新窗口打开查看此主题相关图片如下:cw.png
图片点击可在新窗口打开查看

 

删除关系后正常了?可是表之间必须建立关系呀怎么解决这个问题呀?

[此贴子已经被作者于2017/7/11 12:20:55编辑过]

--  作者:有点甜
--  发布时间:2017/7/11 12:37:00
--  
 做个出错的具体例子发上来测试。可以变通处理。