# Dynamically adding a keypress event handler

**URL:** <https://forum.kirupa.com/t/dynamically-adding-a-keypress-event-handler/325449>\
**Category:** programming\
**Created:** [October 16, 2011, 7:35pm UTC](https://forum.kirupa.com/t/dynamically-adding-a-keypress-event-handler/325449 "2011-10-16T19:35:10Z")\
**Posts on this page:** 1\
**Page:** 1

<div class="post-metadata">

**Author:** ![zzxjoanw](https://avatars.discourse-cdn.com/v4/letter/z/b5e925/32.png) [@zzxjoanw](https://forum.kirupa.com/u/zzxjoanw)\
**Post date:** [October 16, 2011, 7:35pm UTC](https://forum.kirupa.com/t/dynamically-adding-a-keypress-event-handler/325449/1 "2011-10-16T19:35:10Z")

</div>

I’m new to VB and trying to add a Key(Down? Press?) Handler to a dynamicly created textbox. The error I get is “‘KeyDown’ is not an event of ‘Object’”. How do I fix this?

Here are the relevant parts of my code:

```auto
Public Class main
    Structure square
        Dim box As TextBox
        Dim guessedVal As Integer
        Dim correctVal As Integer
    End Structure
    Dim squareArray(9, 9)
    Private Sub init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        For i As Integer = 0 To 8
            For j As Integer = 0 To 8
                squareArray(i, j) = New square()
                AddHandler squareArray(i, j).box.keyDown, AddressOf KeyHandler
            Next
        Next
    Private Sub KeyHandler(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs)
        Select Case sender
            Case Asc("0") To Asc("9")
            Case Else
                sender = 0
        End Select
    End Sub
End Class

```