Textbox 輸入文字 既 Event 輸入 Character 檢查 |
Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As KeyEventArgs) Handles TextBox1.KeyUp Label1.Text = TextBox1.Text If e.KeyCode = Keys.Enter Then Label2.Text = "Enter" Else Label2.Text = "" End If End Sub |