Foxtable(狐表) → 用户栏目 → 专家坐堂 → 组合框


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

主题：组合框
帅哥哟，离线，有人找我吗？
bzqlyj
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：269 积分：2218 威望：0 精华：0 注册：2020/9/28 14:53:00 		组合框  发帖心情 Post By：2021/4/29 11:50:00 [只看该作者]

在窗口录入时，如何控制ComboBox组合框只能通过下拉菜单录入，不能通过双击输入

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


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

窗口设计：“允许直接输入”设为False

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


加好友 发短信
等级：童狐 帖子：269 积分：2218 威望：0 精华：0 注册：2020/9/28 14:53:00 		回复：（有点蓝）窗口设计：“允许直接输入”设为Fals...  发帖心情 Post By：2021/4/29 12:29:00 [只看该作者]

请问这一句  If T ables("表A.表B").Rows.Count =0 Then 
如何改为大于0且B列为"是"的条件，
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

Tables("表A.表B").filter = "B列='是'"
if Tables("表A.表B").rows.count > 0 then
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

if Tables("表A.表B").comoute("count(B列)","B列='是'") > 0 then

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


加好友 发短信
等级：童狐 帖子：269 积分：2218 威望：0 精华：0 注册：2020/9/28 14:53:00 		回复：（有点蓝）if Tables("表A.表B").comoute(...  发帖心情 Post By：2021/4/30 12:06:00 [只看该作者]

下面这个按钮，当我点一下时，可以满足条件1、当我点第二次时，应该显示请先2，但不执行，还是在条件1


1、If C urrentTable.compute("count(A)","A='KK'") > 0 Then
    M essageBox.Show("请先1")
Else
    If C urrentTable.C urrent IsNot Nothing Then
        C urrentTable.C urrent.C lone()
       C urrentTable.C urrent("A") = Nothing
    End If
2、If C urrentTable.c ompute("c ount(A)","A = LL") > 0 Then
        M essageBox.Show("请先2")
    End If
End If

效果：当在窗体中，进行查找，找到当前行后，通过此按钮判断，当前行的A列＝KK，大于0，则显示请先1，否则，克隆行并清除A列内容，第二次按此按钮，如此行A列未编辑为空，则显示请先2，
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

If C urrentTable.c ompute("c ount(A)","A = 'LL'") > 0 Then

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