想做个逻辑列确认流程的功能！ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 想做个逻辑列确认流程的功能！

共有4128人关注过本帖树形打印复制链接主题：想做个逻辑列确认流程的功能！

身份不明

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

加好友

发短信

等级：一尾狐帖子：459 积分：3137 威望：0 精华：0 注册：2014/2/13 9:22:00

想做个逻辑列确认流程的功能！ 发帖心情

Post By：2014/6/24 17:18:00 [只看该作者]

我勾选了后期，备注列就会显示“后期已经完成”勾选质检，备注列会显示“质检已经完成”

如果同时勾选了后期和质检，备注列会同时显示“后期已经完成，质检已经完成”。

此主题相关图片如下：qq图片20140624171424.jpg

Bin

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

加好友

发短信

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

Post By：2014/6/24 17:22:00 [只看该作者]

这么简单的赋值问题,这么久了你还是没掌握这基本知识啊图片点击可在新窗口打开查看

datacolchanged

select case e.datacol.name

case "后期","质检"

if e.datarow("后期") andalso e.datarow("质检") then

e.datarow("备注")=“后期已经完成，质检已经完成”

else if e.datarow("后期") then

e.datarow("备注")="后期已经完成"

else if e.datarow("质检") then

e.datarow("备注")="质检已经完成"

else

e.datarow("备注")=""

end if

end select

有点甜

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

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2014/6/24 17:22:00 [只看该作者]

Select Case e.DataCol.Name
    Case "印刷完成", "后期", "质检"
        Dim str As String = ""
        If e.DataRow("印刷完成") = True Then
            str &= "印刷已完成,"
        End If
        If e.DataRow("后期") = True Then
            str &= "后期已完成,"
        End If
        If e.DataRow("印刷完成") = True Then
            str &= "后期已完成,"
        End If
        e.DataRow("备注") = str.TrimEnd(",")
End Select

下一主题 >> << 上一主题

主题：想做个逻辑列确认流程的功能！