第七篇表单控件设计.pptVIP

7.3 控制类控件 命令按钮(Command) [例7-7] 设计一个如图7.8所示的密码输入窗口, 要求最多允许输入3次密码。 (1) 创建一个表单,然后在其中创建标签和文本框各1个,命令按钮2个。 (2) 属性设置：见表7.8。 (3) Form1的Load事件代码编写如下： public i i用于计算输入次数 i=0 (4) Command1的Click事件代码编写如下： i=i+1 IF THISFORM.Text1.Value=123456 文本框输入值与123456(预置的密码)比较 THISFORM.Release 本表单从内存释放 ELSE IF i3 允许输入3次 MESSAGEBOX(密码错,请重新输入!) THISFORM.Text1.Value= 为重新输入清空文本框 THISFORM.Text1.Setfocus 使文本框获得焦点,就是使光标在其中闪烁 ELSE MESSAGEBOX(密码错,禁止进入系统!) THISFORM.Release ENDIF ENDIF