第1章 Visual basic60基本知识 End Sub 9.命令按钮的 Click事件是用户触发事件,而窗体的Load事件是系统环境事件。这两 类事件的不同之处是什么? 用户触发事件的触发器由用户控制,例如: Click、 KeyPress、 MouseDown等事件 系统环境事件的触发器由 Visual basic系统或程序所控制,如窗体的Load、 Unload Query Unload事件,时钟控件的 Timer事件 10.试通过窗体的启动过程和卸载过程说明事件的触发顺序。 系统环境事件的触发是由系统自动安排的,它们往往有一个相对固定的执行顺序。当 窗体启动的时候,将依次触发: Initialize、Load、 Activate、 Resize事件。而当窗体卸载的 时候,则会先发生 Query Unload,然后再发生 Unload事件。 1l.编一个窗体程序,运行时将键盘上输入的所有字母转换成小写后显示在窗体中。 Private Sub Form KeyPress(Key Ascii As Integer) Print LCase( Chr(Key Asci)) 2.编写一个窗体程序,窗体中有一个文本框,要求在文本框中只能输入整数。 Private Sub TextI Key Press(Key Ascii As Integer) If Key Ascii <48 Or Key Ascii >57 Then End If 13.编写一个窗体程序,窗体中有一个文本框,要求文本框输入的字符串的长度必须 是6,否则焦点不能离开文本框。 Private Sub TextI LostFocuso If Len(TextI)> 6 Then nd If nd sub第 1 章 Visual Basic 6.0 基本知识 ·9· End Sub 9. 命令按钮的 Click 事件是用户触发事件，而窗体的 Load 事件是系统环境事件。这两 类事件的不同之处是什么？ 用户触发事件的触发器由用户控制，例如：Click、KeyPress、MouseDown 等事件。 系统环境事件的触发器由 Visual Basic 系统或程序所控制，如窗体的 Load、Unload、 QueryUnload 事件，时钟控件的 Timer 事件。 10. 试通过窗体的启动过程和卸载过程说明事件的触发顺序。 系统环境事件的触发是由系统自动安排的，它们往往有一个相对固定的执行顺序。当 窗体启动的时候，将依次触发：Initialize、Load、Activate、Resize 事件。而当窗体卸载的 时候，则会先发生 QueryUnload，然后再发生 Unload 事件。 11. 编一个窗体程序，运行时将键盘上输入的所有字母转换成小写后显示在窗体中。 Private Sub Form_KeyPress(KeyAscii As Integer) Print LCase(Chr(KeyAscii)) End Sub 12. 编写一个窗体程序，窗体中有一个文本框，要求在文本框中只能输入整数。 Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii < 48 Or KeyAscii > 57 Then KeyAscii = 0 End If End Sub 13. 编写一个窗体程序，窗体中有一个文本框，要求文本框输入的字符串的长度必须 是 6，否则焦点不能离开文本框。 Private Sub Text1_LostFocus() If Len(Text1) <> 6 Then Text1.SetFocus End If End Sub