第2章窗体与常用控件最新.ppt

* 讲解事件时，可切换到VB，自行编写程序代码，讲解常用的窗体事件。 Click：单击。在窗体内无控件处单击鼠标左键。 Dbclick：双击。在窗体内无控件处双击鼠标左键。 Load：装载。把窗体装入内存。发生在Activate 事件之前。 Resize：调整尺寸。改变窗体大小时触发该事件。 Activate：激活。当窗体变为活动窗体时触发该事件。 Deactivate：失去激活。当窗体不再为活动窗体时触发 。 * 例a中， “Form1窗体对象”的“Show方法”的“Style参数”决定窗体是“有模式的窗体—VBModal” ，还是“无模式的窗体--VBModeless”。 “有模式的窗体”：不允许用户同时与应用程序的其他窗体交互。 “无模式的窗体”：允许用户与应用程序的其他窗体交互。 讲解时可切换到VB，调出工程”教案\例3-2”。其中，打开“应用程序示例1”时，窗体“应用程序1”的显示方式被设成是“有模式的”， 打开“应用程序示例2”时，窗体“应用程序2”的显示方式被设成是“无模式的”， * Private Sub Form_Load() Me.Move (Screen.Width - Width) / 2, (Screen.Height - Height) / 2, Width, 2400 Font.Size = 20 缺省对象名称，则指当前窗体 Caption = 窗体示例 等价于Form1.Caption = 窗体示例 Form1.Show Print 同学们早！同学们好！ 等价于Form1.Print 同学们早！同学们好！ End Sub Private Sub Form_Click() Form1.Refresh Print 老师早！ End Sub Private Sub Form_DblClick() Cls 等价于Form1. Cls Print 老师好！ End Sub * * * 文本框的属性： Name 名称。命名规则同窗体名。默认值为Text1,Text2等。 Text 文本属性。文本属性的值就是用户在文本框中输入的内容。可通过程序获取该属性值。 MaxLength 最大长度。缺省值0，可接受任意长度字符串。 MultiLine 多行属性。默认为“False“,只能输入一行文本。若为“True“，则可输入多行文本。当无水平滚动条时，多行文本会使一个长字符串自动换行。 * 文本框的属性： PasswordChar 密码属性。让用户在文本框内输入口令，指定显示在文本框内的字符。如设置属性值为“＊“，则无论输入任何字符都显示星号。缺省值为空字符串，此时用户可看到输入的字符。 MultiLine 多行属性。默认为“False“,只能输入一行文本。若为“True“，则可输入多行文本。当无水平滚动条时，多行文本会使一个长字符串自动换行。 Alignment 对齐属性。0：左对齐，1：右对齐，2：文本居中。 文本框的BorderStyle,Enabled,Font,ForeColor等属性，其意义同窗体中的属性完全相同。 * 方法 SetFocus：设置焦点。使光标指向指定的文本框。 事件 Change：改变。当文本框内的文本发生改变时触发该事件。 LostFocuse：失去焦点。当光标离开文本时，触发本事件。 KeyPress：按下字符键。按下键盘上的字符键时触发该事件。 * * 一、命令按钮的属性 Caption：标题。通常显示按钮的功能。在标题文本中的某个英文字符前面插入“”，该字符即成为命令按钮的访问键。 Cancel： 取消。指定命令钮为窗体内的“取消“钮。默认值为False.当Cancel = True时，按Esc键等同于单击此键。 Default：默认。指定命令钮为窗体内的“默认“钮。默认值为False。当Default=True时，按回车键同于单击此按钮。 二、 方法 SetFocus：设置焦点。设置为焦点的按钮将有一个边框，直接按回车键可执行该按钮所代表的动作。 三、事件 对于命令按钮来说，单击事件是它最常用、最基本的事件。 * Private Sub Command1_Click() 单击“显示口令”，结果如图2.10（a）所示 Text1.PasswordChar = Command1.Enabled = False Command2.Enabled = True Command2.SetFocus End Sub Private Sub Command2_Cl