1

我正在VB.NET中开发一个应用程序，但答案也可能是基于C#的。我的问题是：我有一个用于过滤某些数据的组合框，并且我需要根据之前编写的内容（如 Google 搜索栏）实施搜索建议。如果用户从 pyshical 键盘插入过滤条件，一切都很好（因为我在Suggest上设置了AutoCompleteMode ，在ListItems上设置了AutoCompleteSource）。但我正在开发的应用程序还为用户提供了一个数字屏幕键盘，如下所示：

在此处输入图像描述

如果需要任何代码示例，我会提供，但键盘的功能很简单：获取书面文本，附加最后按下的键，用新的附加文本覆盖文本框。到目前为止，当用户从这个屏幕键盘插入输入时，建议不再显示。是否有任何方法可以使用屏幕键盘实现相同的行为，就像使用物理键盘一样？谢谢，祝你有美好的一天！

编辑：这是键盘工作方式的代码：

Private Sub AppendKey (ByVal key As String)
    Dim str1 As String = cboFilter.Text
    str1 = str1 & key 
    cboFilter.Text = str1
    cboFilter.Focus()
    cboFilter.SelectionStart = cboFilter.Text.Length 
End Sub
4

1 回答 1

1

正如 Jimi 所建议的，我将在此处发布我找到的解决方案作为答案，以防其他人也遇到此问题。如果键盘用于这个特定的组合框，我在提供的 Sub 中添加了对以下新创建的 Sub 的调用：

Private Sub AppendKey (ByVal key As String)
    If currentCbo = cboFilter Then 
        'currentCbo holds the currently editting combobox'
        AppendKeyInFilterCbo(key)
    Else 
        'The normal behaviour for the other comboboxes'
        Dim str1 As String = currentCbo.Text
        str1 = str1 & key 
        currentCbo.Text = str1
        currentCbo.Focus()
        currentCbo.SelectionStart = currentCbo.Text.Length 
    End If 
End Sub 

Private Sub AppendKeyInFilterCbo (ByVal key As String)
    cboFilter.Focus()
    cboFilter.SelectionStart = cboFilter.Text.Length
    SendKeys.Send("{" + key + "}")
End Sub

仅过滤器组合框需要此行为，因为它是唯一对用户有意义的建议。

于 2020-07-08T08:06:11.110 回答