主题：求助:点击"进货单价"列时,显示进货明细表相同商品编码的不重复单价

在MouseEnterCell事件设置代码：

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

或

1、在StartEdit(注意不是PrePareEdit事件)事件中设置代码：

If e.Col.Name = "编码" Then
Dim v As String = "1: 初中"
v = v & vbcrlf & "2: 高中"
v = v & vbcrlf & "3: 大专"
v = v & vbcrlf & "4: 本科"
v = v & vbcrlf & "5: 硕士"
v = v & vbcrlf & "6: 博士"
e.Table.ShowToolTip(v, e.Row, e.Col)
End If

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