[求助]选中多行，通过Button改变选中行某列的内容。 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]选中多行，通过Button改变选中行某列的内容。

共有3879人关注过本帖树形打印复制链接主题：[求助]选中多行，通过Button改变选中行某列的内容。

viking

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：小狐帖子：371 积分：3120 威望：0 精华：0 注册：2013/7/13 15:49:00

[求助]选中多行，通过Button改变选中行某列的内容。 发帖心情

Post By：2015/4/21 10:04:00 [只看该作者]

选中多行，通过按键批量修改某列的具体内容，这个怎么写啊？

Bin

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2015/4/21 10:06:00 [只看该作者]

With CurrentTable
    For i As Integer = .TopPosition To .BottomPosition
        .Rows(i)("第一列")="abc"
    Next
End With

viking

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：小狐帖子：371 积分：3120 威望：0 精华：0 注册：2013/7/13 15:49:00

Post By：2015/4/21 15:56:00 [只看该作者]

还有个问题，如果显示复选框的情况下，只有选中复选框的才能：通过按键批量修改某列的具体内容，这个怎么写？应该修改哪里？

Bin

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2015/4/21 15:57:00 [只看该作者]

With CurrentTable
For i As Integer = .TopPosition To .BottomPosition

if .Rows(i)("逻辑列") then
.Rows(i)("第一列")="abc"

end if
Next
End With

viking

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：小狐帖子：371 积分：3120 威望：0 精华：0 注册：2013/7/13 15:49:00

Post By：2015/4/21 16:03:00 [只看该作者]

老师，不是“逻辑列”，是前面行号那个地方的复选框

Bin

小大 6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2015/4/21 16:05:00 [只看该作者]

if .Rows(i).Checked then

不过,既然用了复选框的方案,可以直接获取复选框选中的行处理 http://www.foxtable.com/help/topics/1776.htm

viking

小大 7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：小狐帖子：371 积分：3120 威望：0 精华：0 注册：2013/7/13 15:49:00

Post By：2015/4/21 17:20:00 [只看该作者]

还要问个问题：

With CurrentTable
    For i As Integer = .TopPosition To .BottomPosition
        .Rows(i)("合同状态")="申请使用"
        .Rows(i)("申请人")= _UserName
        .Rows(i)("申请时间")= Date.Today()
    Next
    Tables("合同管理").Save()
End With

这个申请人根部不行，怎么回事呢？