Foxtable(狐表)用户栏目专家坐堂 → [求助]多行复选


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

主题:[求助]多行复选

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


加好友 发短信
等级:一尾狐 帖子:492 积分:4243 威望:0 精华:0 注册:2008/9/1 20:47:00
  发帖心情 Post By:2012/5/20 10:57:00 [显示全部帖子]

Dim dr As Integer = e.Form.Controls("TextBox1").Value
For Each r As Row In Tables("表A").Rows
    If r.Index < dr Then
        r("第一列") = True
    End If
Next

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


加好友 发短信
等级:一尾狐 帖子:492 积分:4243 威望:0 精华:0 注册:2008/9/1 20:47:00
  发帖心情 Post By:2012/5/20 11:26:00 [显示全部帖子]

我是根据你的贴图猜的:假如该表的表名是“表A”,选择按钮左边的文本框是“TextBox1”,你一次要勾选n行数据。

将2楼代码放到选择按钮单击事件。


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


加好友 发短信
等级:一尾狐 帖子:492 积分:4243 威望:0 精华:0 注册:2008/9/1 20:47:00
  发帖心情 Post By:2012/5/20 12:16:00 [显示全部帖子]

请传个例子上来。

或者 全部选择


For Each r As Row In Tables("表A").Rows
r("第一列") = True
Next

[此贴子已经被作者于2012-5-20 13:15:57编辑过]

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


加好友 发短信
等级:一尾狐 帖子:492 积分:4243 威望:0 精华:0 注册:2008/9/1 20:47:00
  发帖心情 Post By:2012/5/20 15:36:00 [显示全部帖子]

以下是引用布莱克朱在2012-5-20 14:06:00的发言:
第一列不是逻辑列,你怎么勾选?

这个还用教他吗,吧第一列的列名改为逻辑列的列名即可,因为我不知道逻辑列为何名。


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


加好友 发短信
等级:一尾狐 帖子:492 积分:4243 威望:0 精华:0 注册:2008/9/1 20:47:00
  发帖心情 Post By:2012/5/23 21:47:00 [显示全部帖子]

不上传你的例子,别人很难帮你

 回到顶部