Foxtable(狐表)用户栏目专家坐堂 → 多选框


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

主题:多选框

帅哥哟,离线,有人找我吗?
yongxuanchen
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:238 积分:1986 威望:0 精华:0 注册:2015/2/16 13:29:00
多选框  发帖心情 Post By:2015/10/17 22:57:00 [只看该作者]

    你好,请问在窗口中的多选框的显示问题,需要解决的问题是:

在窗口中,多选框A与表A的某列关联了,当选中多选框A时,在相应字段设定了相关的字符,现在需要的解决的问题是,

当表中的某字段已经有了相关的字符后,在窗口的多选框中能不能显示出来,例如,设定当表A中字符为符合时,当选中时,多选框A能自动显示已经选中过状态,谢谢。


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/10/18 11:05:00 [只看该作者]

不理解你什么意思。

 

http://www.foxtable.com/help/topics/0925.htm

 


 回到顶部
帅哥哟,离线,有人找我吗?
yongxuanchen
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:238 积分:1986 威望:0 精华:0 注册:2015/2/16 13:29:00
CheckBox  发帖心情 Post By:2015/10/18 23:16:00 [只看该作者]

    我的问题是:CheckBox中选中时,是打上钩的,我想在表A中如果已经是选中的结果,我想问能不能在是选中的结果时,其自动重新变成打勾,谢谢!

例子:我在CheckBox中写上这样的代码:If e.Sender.Checked=True Then
     Tables("电梯信息表") .Current.DataRow("玻璃门")="符合"
     Tables("电梯信息表") .Current.DataRow("玻璃门结论")="合格"
Else
   Tables("电梯信息表") .Current.DataRow("玻璃门")="/"
    Tables("电梯信息表") .Current.DataRow("玻璃门结论")="/"
End If

我想,当信息表中字段是符合时,当我选中该行时,CheckBox能够打上钩。谢谢!


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/10/19 9:24:00 [只看该作者]

去编写CurrentChanged事件

 

If Forms("窗口1").Opened Then

    Forms("窗口1").Checked = (e.Table.Current("玻璃门") = "符合")

End If


 回到顶部
帅哥哟,离线,有人找我吗?
yongxuanchen
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:238 积分:1986 威望:0 精华:0 注册:2015/2/16 13:29:00
代码报错了  发帖心情 Post By:2015/10/25 0:21:00 [只看该作者]

   这段代码报错了,checked不是wimford的成员,谢谢!

 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2015/10/25 16:22:00 [只看该作者]

If Forms("窗口名").Opened Then
   forms("窗口名").Controls("控件名").Checked = (e.Table.Current("玻璃门") = "符合")
End if

 回到顶部
帅哥哟,离线,有人找我吗?
yongxuanchen
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:238 积分:1986 威望:0 精华:0 注册:2015/2/16 13:29:00
程序报错  发帖心情 Post By:2015/10/26 23:13:00 [只看该作者]

If Forms("自检记录信息").Opened Then
   forms("自检记录信息").Controls("CheckBox7").Checked = (e.Table.Current("玻璃门") = "符合")
   forms("自检记录信息").Controls("CheckBox3").Checked = (e.Table.Current("共用机房") = "符合")
    forms("自检记录信息").Controls("CheckBox4").Checked = (e.Table.Current("紧急电动") = "符合")
   forms("自检记录信息").Controls("CheckBox7").Checked = (e.Table.Current("机房高度差") = "符合")
End If

我写了这个程序,需要实现的功能好像能够实现了,就是在程序进行保存时出现了报错,提示 “列“玻璃门”不属于表 设备基础信息”。请指教,谢谢!我这程序关联了一个查询表。

[此贴子已经被作者于2015/10/26 23:33:45编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/10/26 23:19:00 [只看该作者]

那就是说你 设备基础信息 没有对应的列。

 回到顶部
帅哥哟,离线,有人找我吗?
yongxuanchen
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:238 积分:1986 威望:0 精华:0 注册:2015/2/16 13:29:00
请教  发帖心情 Post By:2015/11/5 16:55:00 [只看该作者]

    那我只有一个表有那个列,那该怎么办,需要关联进去吗?

 


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/11/5 16:57:00 [只看该作者]

以下是引用yongxuanchen在2015/11/5 16:55:00的发言:

    那我只有一个表有那个列,那该怎么办,需要关联进去吗?

 

 

呃,肯定要有此列,才能判读。具体你要做什么,做个例子瞧瞧?


 回到顶部
总数 24 1 2 3 下一页