求助:MouseEnterCell事件中的问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 求助:MouseEnterCell事件中的问题

共有7071人关注过本帖树形打印复制链接主题：求助:MouseEnterCell事件中的问题

kevin

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

等级：小狐帖子：359 积分：3403 威望：0 精华：0 注册：2011/8/2 20:53:00

求助:MouseEnterCell事件中的问题 发帖心情

Post By：2013/4/10 17:08:00 [只看该作者]

在MouseEnterCell事件设置代码：

If e.Col.Name = "备注" AndAlso e.Row.IsNull("备注") = False Then
e.Table.ShowToolTip(e.Row("备注"),e.Row,e.Col)
End If

根据以上代码,我希望做一个功能:
进入单元格为产品编号时,获取进货明细表的同一产品编号的所有不重复单进货价;

Bin

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

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2013/4/10 17:15:00 [只看该作者]

dim list as List(of DataRow) = e.Table.DataTable.Select("产品编号= '" & e.Rows("产品编号") & "'")

dim str as string

For i As Integer = 0 to list.Count-1

str=str+"/r/n"+list(i)("进货价")

e.Table.ShowToolTip(str,e.Row,e.Col)

kevin

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

等级：小狐帖子：359 积分：3403 威望：0 精华：0 注册：2011/8/2 20:53:00

Post By：2013/4/10 17:30:00 [只看该作者]

非常感谢你的回答,

dim list as List(of DataRow) = e.Table.DataTable.Select("产品编号= '" & e.Rows("产品编号") & "'")

dim str as string

For i As Integer = 0 to list.Count-1

str=str+"/r/n"+list(i)("进货价")

e.Table.ShowToolTip(str,e.Row,e.Col)

这代码,好像并不是从进货明细表获取相同产品编号不重复的进货单价;

主题：求助:MouseEnterCell事件中的问题