Foxtable(狐表)用户栏目专家坐堂 → [求助]关于判断(已解决)


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

主题:[求助]关于判断(已解决)

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


加好友 发短信 一级勋章
等级:MVP荣誉狐 帖子:5154 积分:31434 威望:0 精华:8 注册:2008/9/8 12:27:00
  发帖心情 Post By:2011/9/6 11:48:00 [显示全部帖子]

beforeselchange:

 

If e.Table.Current.Locked = False Then '如果第一行没有锁定

        If e.OldRange.RowSel <> e.NewRange.RowSel Then
            e.cancel= True
            messagebox.show("请先锁定行","^_^")
        End If

End If


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


加好友 发短信 一级勋章
等级:MVP荣誉狐 帖子:5154 积分:31434 威望:0 精华:8 注册:2008/9/8 12:27:00
  发帖心情 Post By:2011/9/6 21:27:00 [显示全部帖子]

以下是引用noname在2011-9-6 21:16:00的发言:
谢谢,现在就剩下19楼的问题了

这是个问题,有兴趣的看看····· 


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


加好友 发短信 一级勋章
等级:MVP荣誉狐 帖子:5154 积分:31434 威望:0 精华:8 注册:2008/9/8 12:27:00
  发帖心情 Post By:2011/9/6 23:07:00 [显示全部帖子]

以下是引用狐狸爸爸在2011-9-6 21:47:00的发言:

BeforeSelchange事件:

 

If e.Table.Rows(e.OldRange.Rowsel).Locked = False Then
    If e.OldRange.RowSel <> e.NewRange.RowSel Then
        e.cancel= True
        messagebox.show("请先锁定行","^_^")
    End If
End If

这样啊·········  


 回到顶部