Foxtable(狐表) → 用户栏目 → 专家坐堂 → 这样的按钮代码为什么会使行号变成橙色？


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

主题：这样的按钮代码为什么会使行号变成橙色？
帅哥哟，离线，有人找我吗？
comnets
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：三尾狐 帖子：698 积分：5618 威望：0 精华：0 注册：2013/4/9 6:59:00 		这样的按钮代码为什么会使行号变成橙色？  发帖心情 Post By：2013/5/24 17:52:00 [只看该作者]

修改按钮click事件代码：

If User.IsRole("修改") Then
    
Tables("A表").Current.Locked = False
    For Each c As WinForm.Control In e.Form.Controls
        c.Enabled=True
    Next

Dim fh As Boolean = ((Tables("A表").Current("b") = True) OrElse (Tables("A表").Current("c") = True))
If fh = True Then
Tables("A表").Current("d") = True
End If


    e.Form.Controls("a").Visible = True
    e.Form.Controls("a").Enabled = True    
    e.Form.Controls("b").Visible = False
    e.Form.Controls("b").Enabled = False
    e.Form.Controls("c").Visible = False
    e.Form.Controls("c").Enabled = False
    e.Form.Controls("e").Visible = False
    e.Form.Controls("f").Select()
    e.Form.Controls("g").Visible = False
    e.Form.Controls("h").Enabled = False
    e.Form.Controls("i").Visible = False
    e.Form.Controls("j").Enabled = False
Else
    MessageBox.Show("你无修改权限!")
End If


这样的click事件代码，在修改按钮点下之后并未做任何修改时为什么当前行号也会变成橙色？（此时红色代码部分的A表当前行b列、c列都不为真）
[此贴子已经被作者于2013-5-24 17:58:51编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
Bin
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：35433 积分：178530 威望：0 精华：3 注册：2013/3/30 16:36:00 		  发帖心情 Post By：2013/5/24 17:55:00 [只看该作者]

Dim fh As Boolean = ((Tables("A表").Current("b") = True) OrElse (Tables("A表").Current("c") = True))
If fh = True Then
Tables("A表").Current("d") = True
End If
  因为你在这里赋值了
[此贴子已经被作者于2013-5-24 17:55:53编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
comnets
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：三尾狐 帖子：698 积分：5618 威望：0 精华：0 注册：2013/4/9 6:59:00 		  发帖心情 Post By：2013/5/24 17:58:00 [只看该作者]

表内当前行任何列并无任何变化，只是定义了一个变量并赋值，没有写入和更改表内任何数据，也会改变行的状态？

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


加好友 发短信
等级：三尾狐 帖子：698 积分：5618 威望：0 精华：0 注册：2013/4/9 6:59:00 		  发帖心情 Post By：2013/5/24 18:00:00 [只看该作者]

此时红色代码部分的A表当前行b列、c列都不为真，也就是没有给当前行d列赋值啊。

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


加好友 发短信
等级：贵宾 帖子：35433 积分：178530 威望：0 精华：3 注册：2013/3/30 16:36:00 		  发帖心情 Post By：2013/5/24 18:02:00 [只看该作者]

例子发出来

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