vb6 - VB6：使 InputBox 中的默认响应未突出显示？

Question

在 VB6（及更早版本）中，有没有办法让 InputBox 中的默认响应不突出显示？

Answer 1

查看本教程，了解 VB.net 中的自定义 InputBox。希望它能让您了解如何在 VB6 中实现此类功能。

Answer 2

如果你不需要在 Vista 或更高版本上运行，你可以试试这个 kludge：

Private Sub Form_Load()
    Timer1.Enabled = False
End Sub

Private Sub Command1_Click()
    Timer1.Interval = 250
    Timer1.Enabled = True
    InputBox "no selection", "no sel", "default value"
End Sub

Private Sub Timer1_Timer()
    Timer1.Enabled = False
    SendKeys "{RIGHT}", False
End Sub

要进行测试，请创建一个包含以下内容的表单： • 命令按钮 • 计时器控件，并使用默认名称。