[求助]6楼这代码有什么问题呀？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]6楼这代码有什么问题呀？

共有6595人关注过本帖树形打印复制链接主题：[求助]6楼这代码有什么问题呀？

dengzhihao

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

加好友

发短信

等级：童狐帖子：252 积分：2169 威望：0 精华：0 注册：2012/11/4 22:07:00

[求助]6楼这代码有什么问题呀？ 发帖心情

Post By：2013/6/15 21:36:00 [显示全部帖子]

产品（绿色）（红色）库存值

苹果 60 20 100

香蕉 50 30 80

提示值1和提示值2是可以自行输入的，让苹果的库存值小于60大于20时，库存值变成绿色；让库存值小于20时，则库存值变成红色！求代码呀！

[此贴子已经被作者于2013-6-16 15:59:06编辑过]

dengzhihao

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

加好友

发短信

等级：童狐帖子：252 积分：2169 威望：0 精华：0 注册：2012/11/4 22:07:00

Post By：2013/6/15 21:52:00 [显示全部帖子]

以下是引用gsnake在2013-6-15 21:49:00的发言：

DrawCell

这个？http://www.foxtable.com/help/index.html?n=0656.htm

如果很多产品，代码不是超多！而且，希望是动态的哦！

dengzhihao

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

加好友

发短信

等级：童狐帖子：252 积分：2169 威望：0 精华：0 注册：2012/11/4 22:07:00

[求助]这个库存提示的代码如何写呀？ 发帖心情

Post By：2013/6/15 23:28:00 [显示全部帖子]

If e.Row("产品") = "苹果" Then

If e.Row("库存值") < e.Row("绿色") Then

e.Style = "绿色"

End If

If e.Row("库存值") < e.Row("红色") Then

e.Style = "红色"

End If

这里只做了一个苹果的，请教如何简单做多个产品？

[此贴子已经被作者于2013-6-16 0:04:00编辑过]

dengzhihao

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

加好友

发短信

等级：童狐帖子：252 积分：2169 威望：0 精华：0 注册：2012/11/4 22:07:00

[求助]这关闭代码哪里出错啦？ 发帖心情

Post By：2013/6/16 15:52:00 [显示全部帖子]

以下是引用有点甜在2013-6-16 9:45:00的发言：

    If e.Row("库存值") < e.Row("绿色") Then
        e.Style = "绿色"
    End If
    If e.Row("库存值") < e.Row("红色") Then
        e.Style = "红色"
    End If

我之前试过很多次了，都不行！后来发现，不知道是不是有BUG？

当库存值为150时，绿色值为200，红色值为100，判断为“绿色”正常！

当库存值为150时，绿色值为200，红色值为50，判断为“红色”，正常吗？

发现这些数值必须大于100以上才能正常判断哦！

不好意思！后来发现是类型不一致导致的！库存值设为整数，绿色值和红色值还是字符串，所以才会有上面的问题！

[此贴子已经被作者于2013-6-16 16:02:35编辑过]

dengzhihao

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

加好友

发短信

等级：童狐帖子：252 积分：2169 威望：0 精华：0 注册：2012/11/4 22:07:00

Post By：2013/6/17 0:32:00 [显示全部帖子]

以下是引用有点甜在2013-6-16 20:45:00的发言：

就是，做个简单例子发上来，一分钟就知道结果。

解决啦！谢谢大家帮忙！

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

主题：[求助]6楼这代码有什么问题呀？