我窗体里大多有多个tables控件,并且我想着每个tables控件的第一行都能有一个浮动框的提示关于浮动框的提示我现在是这样做的
表的_MouseEnterCell事件
If e.Col.Name =
"FabricYarn" Then
Dim str As String = ""
For Each c As Col In e.Table.Cols
str += c.Caption & ":"
& e.Row(c.Name) & vbcrlf
Next
e.Table.ShowToolTip(str,e.Row,e.Col)
End If
表的_MouseLeaveCell事件
If e.Col.Name =
"FabricYarn" Then
e.Table.HideToolTip()
End If
由于表很多,每个表都单独设置非常麻烦!
问题1,想在全局表里设置以上事件,以上代码就不能指定 列名了,而要判断是否是第一列,这个我不清楚怎么判断,请指教!
问题2,在窗体里,只有我单击激活各tables控件,才能显示浮动框,用什么代码 能判断我的鼠标 进入 该tables区域,该tables自动激活(Focus)?