Textbox 在Visual Basic 6中输入数字时如何引发单击事件

Textbox 在Visual Basic 6中输入数字时如何引发单击事件,textbox,command,Textbox,Command,我想知道在VisualBasic6中,当一个数字输入到一个文本框中时,我怎么会导致单击事件。我正在创建一个货币转换器,不必单击按钮来计算答案,我希望这样,当您输入一个数字时,它会自动计算,而无需单击任何东西。将有两个文本框,一个用于输入,一个用于输出,我希望这样,当一个数字输入到第一个文本框中时,它将被计算,并且答案将自动输出到第二个文本框中,而无需单击任何内容。谢谢:)您必须在输入文本框中使用更改事件。示例代码如下所示: Private Sub Text1_Change() ' get

我想知道在VisualBasic6中,当一个数字输入到一个文本框中时,我怎么会导致单击事件。我正在创建一个货币转换器,不必单击按钮来计算答案,我希望这样,当您输入一个数字时,它会自动计算,而无需单击任何东西。将有两个文本框,一个用于输入,一个用于输出,我希望这样,当一个数字输入到第一个文本框中时,它将被计算,并且答案将自动输出到第二个文本框中,而无需单击任何内容。谢谢:)

您必须在输入文本框中使用更改事件。示例代码如下所示:

Private Sub Text1_Change()
    ' get characters from textbox
        Dim text As String
        text = Text1.text

    ' if we have a number
        If IsNumeric(text) Then
            ' convert characters to numbers
                Dim inputNumber As Double
                inputNumber = text

            ' calculate
                Dim answer As Double
                answer = calculate(inputNumber)
        End If
End Sub

Private Function calculate(number As Double)
    ' -----------------------------------
    ' Your calculation here
    ' -----------------------------------
End Function