Office中国论坛/Access中国论坛

标题: 请问：能否实现鼠标经过某字段时显示其具体内容？ [打印本页]

作者: cashiba 时间: 2009-10-14 02:04
标题: 请问：能否实现鼠标经过某字段时显示其具体内容？
子窗体中的某字段（文件内容）值比较长，在列宽固定的情况下无法看完整。请问：

能否实现象网页中的文字提示框一样，当鼠标点击或滑过某条记录的文件内容字段区域时，在旁边显示出具体内容？

作者: hi-wzj 时间: 2009-10-14 06:51
用代码控制控件的“控件提示文本”属性。

作者: cashiba 时间: 2009-10-14 09:08
请问hi-wzj 老师，如何编写代码呢？新手，恳请指点！

作者: cashiba 时间: 2009-10-14 09:12
控件提示文本这里好像没有下拉箭头也没有省略号，怎么写代码呢？

作者: hi-wzj 时间: 2009-10-14 10:01
Private Sub Text0_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Dim t As String
If IsNull(Me.Text0) Then
t = ""
Else
t = Me.Text0
End If
Me.Text0.ControlTipText = t
End Sub

以上代码是在text0文本框鼠标移动后触发显示该文本框的内容（鼠标在上面移动一下，停止后显示出来）。

作者: cashiba 时间: 2009-10-14 13:28
好像不行啊，鼠标经过时只见闪烁，未见文本提示

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)