窗体上有 1 个名称为 Text1、 内容为空的文本框。 编写如下事件过程：
Private Sub Text1_KeyUp(KeyCode As Integer， Shift As Integer)
Print Text1． Text；
End Sub
运行程序， 并在文本框中输入“123”， 则在窗体上的输出结果为
Keyup 事件是在松开按钮时发生。 按下 1 松开时， 文本框中显示 1， 执行 Keyup事件过程， 在窗体上显示文本框内容， 即 1。 按下 2 松开时， 文本框中显示 12， 执行 KeyUp事件过程， 在窗体上 1 后面接着现在显示文本框的内容， 即窗体上显示为 112。 按下 3 松开时， 文本框中显示 123， 执行 KeyUp 事件过程， 在窗体上 112 后面接着显示文本框的内容，即在窗体上显示为 112123。