0


私は Visual Basic 2010 に 2 つのテキスト ボックスを持っています。ユーザーが Textbox2
Textbox1
Textbox2
に値 (整数) を入力すると、値Textbox2が より大きい場合Textbox1、ビープ音が鳴り、彼がこのようにすることを回避し
Example:ます。ユーザー5が Textbox1 に書き込み、今、彼はより大きなものであると書い8てTextbox2いるので、ビープ音で無視したい. 私はこのコードを持っていますが、これは機能していません。85Textbox2

Private Sub TextBox2_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox2.KeyPress

    Dim valx1 As Integer
    Dim valx2 As Integer

    valx1 = (Val(TextBox1.Text))
    valx2 = (Val(TextBox2.Text))


    If (valx1) > (valx2) Then
        Beep()
        e.Handled = True
    End If

End Sub
4

1 に答える 1

0

このコードはあなたの要件に合っています。ちなみに、ユーザーに警告するためにビープ音を使用すると、ユーザーが邪魔されます。

 Private Sub TextBox2_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox2.KeyPress

   if val(TextBox1.Text.trim) > val(TextBox2.Text.trim & e.keychar) then
          Beep()
          e.Handled = True
    end if

End Sub
于 2013-04-11T17:16:03.930 に答える