Question

编写VB程序的一点问题

现在编一个刷卡的小程序，就是在text里输入一连串字符串后点击查询键command1，就可以查到相应信息，但是我现在不想要查询键了，就是想在text里得到字符串后就自动出来信息，那我原来在command1-click下的程序应该放在哪里？

Answer 1

输入字符串后一般得要个结束的键，通常是回车，那么这时就可以把原来在command1-click下的程序应该放在回车键的响应事件中，如：

Private Sub Text2_KeyPress(Index As Integer, KeyAscii As Integer)
    If KeyAscii = 13 Then
        Select Case Index
            Case 0
                MSChart2.Plot.Axis(VtChAxisIdX).ValueScale.Maximum = Val(Text2(0).Text)
            Case 1
                MSChart2.Plot.Axis(VtChAxisIdX).ValueScale.Minimum = Val(Text2(1).Text)
            Case 2
                MSChart2.Plot.Axis(VtChAxisIdY).ValueScale.Maximum = Val(Text2(2).Text)
            Case 3
                MSChart2.Plot.Axis(VtChAxisIdY).ValueScale.Minimum = Val(Text2(3).Text)
        End Select
    End If
End Sub

另外也可以放在change事件中，但是该事件每每输入一个字符就会进行判断

追问

可是text里面的字符串不是通过键盘输入的，是直接由另一程序得到然后赋值来的，就不能用KeyPress和KeyDown吧

追答

那就放在text的change事件就行了

Answer 2

使用 textbox 的键盘按下事件，即输入信息后点击回车键，显示对应数据：

Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
    If KeyCode = 13 Then
        'Searching the information
    End If
End Sub

Answer 3

可以放在change或者LostFocus事件里