中显 示 当前时间, 则文本框 TEXT1 的 事件: This.Value = TIME() 4) 退出按钮的 Click 事件代码为: ThisForm. 5)要使命令按钮 Command1 上面显示“清除” 两个字,应设置: = "清 除"
6、标签、文本框、命令按钮构成一个表单 FORM1.SCX,运行时: 1)表单自动居中;则表单的 AutoCenter 属性应设置为 2) 单击 “大写 “按钮, 将文本框中的内容全部转换为大写字母; “大写” 按钮的 Click 事件代码为:x=ThisForm.Text1.Value ThisForm.Text1. = Upper(x) 3) 单击“小写“按钮,将文本框中的内容 全部转换为小写字母。则“小写”按钮的 Click 事件代码为: x=Lower( ) ThisForm.Text1.Value = x 4) 单击“退出“按钮,退出表单,“退出” 按钮的 事件代码为: .Release