ms-access - MS Access VBA：从文本框中获取选定的文本部分？

Question

我很难找到实现这一目标的方法。基本上，我只需要一种方法来获取文本框中选定的文本部分。这个想法是，用户可以双击较大字符串中的单词以自动搜索另一组数据。

如果可以使以下内容起作用，则所选文本将简单地调用一个运行我的搜索过程的函数。以下不起作用，我的许多在线查找仅捕获整个文本框。有任何想法吗？

Private Sub txtproductName_DblClick(Cancel As Integer)
    Debug.Print txtproductName.SelText
End Sub

Answer 1

I've used MouseUp instead

Private Sub txtproductName_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
    If Len(txtproductName.SelText) > 0 Then
    'do my thing
    Debug.Print txtproductName.SelText
    Else
    'do nothing
    End If
End Sub

Answer 2

您可以使用 LostFocus 事件。

Private Sub txtproductName_LostFocus()
    MsgBox Me.txtproductName.SelText
End Sub