Foxtable(狐表) → 用户栏目 → 专家坐堂 → 关联表与主表绑定录入窗口


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

主题：关联表与主表绑定录入窗口
帅哥哟，离线，有人找我吗？
11112
 小大  11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：108 积分：671 威望：0 精华：0 注册：2021/9/24 17:07:00 		  发帖心情 Post By：2021/10/13 16:47:00 [只看该作者]

就是我到时候能不能用这个方法添加所有文本框

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  12楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：105926 积分：538693 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/10/13 16:52:00 [只看该作者]

既然可以改一个文本框的绑定，肯定也可以改其它的。这种问题自行试试不就知道了

 回到顶部
帅哥哟，离线，有人找我吗？
11112
 小大  13楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：108 积分：671 威望：0 精华：0 注册：2021/9/24 17:07:00 		  发帖心情 Post By：2021/10/13 16:55:00 [只看该作者]

If CurrentTable.Name = "Table_3.Table_7"  AndAlso Forms("录入窗口").Opened Then
    Dim zt As WinForm.TextBox = Forms("录入窗口").PictureViewer("PictureViewer1")
    zt.BindingField = Nothing
    zt.BindingField = "Table_3.Table_7.图片"
End  If 
PictureViewer 应该怎么改
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  14楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：105926 积分：538693 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/10/13 17:10:00 [只看该作者]

Dim zt As WinForm.PictureViewer = Forms("录入窗口").controls("PictureViewer1")
[此贴子已经被作者于2021/10/13 17:10:12编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
11112
 小大  15楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：108 积分：671 威望：0 精华：0 注册：2021/9/24 17:07:00 		  发帖心情 Post By：2021/10/14 9:29:00 [只看该作者]

怎么把table_3.table_7的单号列与状态列在录入窗口的时候变成红色

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  16楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：105926 积分：538693 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/10/14 9:47:00 [只看该作者]

表格红色，还是控件红色

 回到顶部
帅哥哟，离线，有人找我吗？
11112
 小大  17楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：108 积分：671 威望：0 精华：0 注册：2021/9/24 17:07:00 		  发帖心情 Post By：2021/10/14 9:50:00 [只看该作者]

控件

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  18楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：105926 积分：538693 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/10/14 9:52:00 [只看该作者]

到窗口设计设置控件背景色即可。使用代码参考：http://www.foxtable.com/webhelp/topics/0720.htm

 回到顶部
帅哥哟，离线，有人找我吗？
11112
 小大  19楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：108 积分：671 威望：0 精华：0 注册：2021/9/24 17:07:00 		  发帖心情 Post By：2021/10/14 9:59:00 [只看该作者]

If CurrentTable.Name = "Table_3.Table_7"  AndAlso Forms("录入窗口").Opened Then
    Dim zt As WinForm.TextBox = Forms("录入窗口").Controls("状态")
    zt.BindingField = Nothing
    zt.BindingField = "Table_3.Table_7.状态"
    
    
End  If
 如果我想这里加呢 老师
 回到顶部
帅哥哟，离线，有人找我吗？
11112
 小大  20楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：108 积分：671 威望：0 精华：0 注册：2021/9/24 17:07:00 		  发帖心情 Post By：2021/10/14 9:59:00 [只看该作者]

字变成红色，文本框只读
[此贴子已经被作者于2021/10/14 9:59:42编辑过]
 回到顶部
总数 31 上一页 1 2 3 4 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.07422 秒, 4 次数据查询