Foxtable(狐表)用户栏目专家坐堂 → [求助]切换行问题


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

主题:[求助]切换行问题

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


加好友 发短信
等级:幼狐 帖子:142 积分:1031 威望:0 精华:0 注册:2011/8/14 1:57:00
  发帖心情 Post By:2011/9/6 21:45:00 [只看该作者]

狐狸爸爸,又出问题了。。。。

现在增加行可以了,但是删除行又出现错误了,这个BeforeSelChange,真把我搞郁闷了


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


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/9/6 21:50:00 [只看该作者]

不是还有这个事件吗:
 
 
http://www.foxtable.com/help/topics/0632.htm

 


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


加好友 发短信
等级:幼狐 帖子:142 积分:1031 威望:0 精华:0 注册:2011/8/14 1:57:00
  发帖心情 Post By:2011/9/6 23:10:00 [只看该作者]

好像不太行,狐狸爸爸,还请明示

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


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/9/6 23:14:00 [只看该作者]

其实我不太明白你的问题,删除行又怎么啦?

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


加好友 发短信
等级:幼狐 帖子:142 积分:1031 威望:0 精华:0 注册:2011/8/14 1:57:00
  发帖心情 Post By:2011/9/6 23:18:00 [只看该作者]

删除行出现错误,错误代码还是BeforeSelChange,我也觉得应该在beforedeletedatarow里面写点东西,但不知道怎么写

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


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/9/6 23:20:00 [只看该作者]

我测试我16楼的文件,删除行的时候没有出错啊。

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


加好友 发短信
等级:幼狐 帖子:142 积分:1031 威望:0 精华:0 注册:2011/8/14 1:57:00
  发帖心情 Post By:2011/9/7 8:30:00 [只看该作者]

当删除最后一行的时候,会出错,删除其他行,不会出错,神奇


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


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/9/7 8:50:00 [只看该作者]

收到,我查查。

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


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/9/7 9:01:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目4.rar


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


加好友 发短信
等级:幼狐 帖子:142 积分:1031 威望:0 精华:0 注册:2011/8/14 1:57:00
  发帖心情 Post By:2011/9/7 9:29:00 [只看该作者]

If e.OldRange.RowSel >= 0 AndAlso e.OldRange.Rowsel < e.Table.Rows.Count AndAlso e.Table.Rows(e.OldRange.Rowsel).Locked = False
    If e.NewRange.RowSel <> e.OldRange.RowSel Then '而且即将选择另一行
        e.Cancel = True '那么取消操作
        MessageBox.Show("请先保存当前客户信息!", "提示")
    End If
End If

 

 

可以了,非常感谢狐狸爸爸的耐心调试,但是不是很理解这个代码


 回到顶部
总数 33 上一页 1 2 3 4 下一页