VB6：在InputBox中使默认响应不突出显示？

Question

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

Answer 1

查看此tutorial for a custom InputBox in VB.net。希望它能帮助您了解如何在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

要测试，请创建一个表单：     •命令按钮 •定时器控制，并使用默认名称。