Foxtable(狐表)用户栏目专家坐堂 → 求解个问题!


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

主题:求解个问题!

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


加好友 发短信
等级:婴狐 帖子:79 积分:584 威望:0 精华:0 注册:2015/5/27 17:19:00
求解个问题!  发帖心情 Post By:2015/6/5 10:02:00 [只看该作者]

我希望能在表中,选择了某单元格后并判断这个单元格里的内容为  “处理结束! 后 执行其他命令!

应该怎么做??
我试图在表属性的AfterSelChange里 增加命令:
Dim c As Col = e.Table.Cols(e.NewRange.ColSel)

Select Case c.name

    Case "售后"
If e.DataRow ("售后")="处理结束!" Then
Forms("清楚提示"). Open()
End If


End Select
 

不行!!提示成员不对!e.DataRow ("售后")="处理结束!" 
[此贴子已经被作者于2015/6/5 10:10:33编辑过]

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


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

表的DoubClick 事件

if e.row(e.col.name) = "合格" then
 '你的命令
end if

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


加好友 发短信
等级:婴狐 帖子:79 积分:584 威望:0 精华:0 注册:2015/5/27 17:19:00
  发帖心情 Post By:2015/6/5 10:08:00 [只看该作者]

我不想在DoubClick 事件里!因为DoubClick 事件有了其他 命令了
我只希望 选择了 这个单元格

[此贴子已经被作者于2015/6/5 10:08:18编辑过]

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/6/5 10:10:00 [只看该作者]

Dim r As Row = e.Table.Rows(e.NewRange.Rowsel)

If r("售后")="处理结束!" Then


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


加好友 发短信
等级:婴狐 帖子:79 积分:584 威望:0 精华:0 注册:2015/5/27 17:19:00
求解释下!  发帖心情 Post By:2015/6/5 10:14:00 [只看该作者]

Dim r As Row = e.Table.Rows(e.NewRange.Rowsel)


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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/6/5 10:15:00 [只看该作者]

  获取此表的选中的那一行

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


加好友 发短信
等级:婴狐 帖子:79 积分:584 威望:0 精华:0 注册:2015/5/27 17:19:00
  发帖心情 Post By:2015/6/5 10:18:00 [只看该作者]

谢谢

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


加好友 发短信
等级:婴狐 帖子:79 积分:584 威望:0 精华:0 注册:2015/5/27 17:19:00
麻烦 再帮个忙  发帖心情 Post By:2015/6/5 10:37:00 [只看该作者]


这是一个botton的chick事件:


With Tables("维修")
    For i As Integer = .BottomPosition To .TopPosition Step -1
        .Rows(i).Delete()
    Next
End With


forms("清楚提示").close()

我想删除指定的 表 内的 指定的行!
怎么做?
所谓指定的行:指符合条件的行!比如和其他表相同编号的行!

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


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


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


加好友 发短信
等级:婴狐 帖子:79 积分:584 威望:0 精华:0 注册:2015/5/27 17:19:00
跳转  发帖心情 Post By:2015/6/5 11:07:00 [只看该作者]

  
这是”库“ 双击事件:


If e.Col.Name = "状态" Then
    e.Cancel= True
    Forms("生产状态").Open()
    MainTable=Tables("生产状态")
ElseIf e.Col.Name = "售后" Then
    e.Cancel= True
    
    If e.Row(e.Col.name) = "处理结束!" Then
        Forms ("清楚提示"). Open()
    End If
    
    
    MainTable=Tables("维修")
    
End If  

我想跳转到这个表的时候 顺便 控制单元格的选择!
应该怎么处理?

比如 :因为编号是关联的!我想跳转到”维修“表,并单元格选择在“与触发事件相同编号的行!”
[此贴子已经被作者于2015/6/5 11:10:57编辑过]

 回到顶部
总数 11 1 2 下一页