Foxtable(狐表) → 用户栏目 → 专家坐堂 → 取值问题


  共有1158人关注过本帖树形打印复制链接

主题：取值问题
帅哥，在线噢！
有点蓝
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：109476 积分：557042 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2024/5/27 8:38:00 [显示全部帖子]

1、窗口1beforeclose事件，把窗口1textbox1的值给窗口2的textbox1的值
 回到顶部
帅哥，在线噢！
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：109476 积分：557042 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2024/5/27 10:19:00 [显示全部帖子]


 回到顶部
帅哥，在线噢！
有点蓝
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：109476 积分：557042 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2024/5/27 10:45:00 [显示全部帖子]

以下是引用lin98在2024/5/27 10:23:00的发言：
问题一：需求：窗口1的TextBox1的值不为空时，关闭窗口1后，赋值给窗口2的TextBox1的值.如何实现？
Forms("窗口1").Controls("TextBox1").text = Forms("窗口2").Controls("TextBox14").text

报错提示：("窗口1")已关闭，不能调用"窗口2的TextBox14，如何处理？

窗口1beforeclose事件
if Forms("窗口2").opened then
Forms("窗口2").Controls("TextBox14").text = Forms("窗口1").Controls("TextBox1").text 
end if
 回到顶部
帅哥，在线噢！
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：109476 积分：557042 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2024/5/27 10:48:00 [显示全部帖子]

以下是引用lin98在2024/5/27 10:31:00的发言：
需求：如果表A的选中字段，为未选中，窗口1的表A和表B的行可编辑，如果表A的选中字段，为选中，窗口1的表A和表B的行就不可编辑，如何实现？
If e.Row("选中") = 1 Then
    e.Cancel = True '
End If

上面代码写在表A只在 表A有，对模拟关联的表B无效，如何让表B的关联行有效？

表A的prepareedit事件

If e.Row("选中") = true Then
    e.Cancel = True '
End If

表B的prepareedit事件
dim r as row =tables("表A").current
If r("选中") = true Then
    e.Cancel = True '
End If
 回到顶部
帅哥，在线噢！
有点蓝
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：109476 积分：557042 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2024/5/27 16:18:00 [显示全部帖子]


 回到顶部
帅哥，在线噢！
有点蓝
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：109476 积分：557042 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2024/5/27 16:33:00 [显示全部帖子]

请上传实例说明

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.03516 秒, 5 次数据查询