vfp 表单设计
1)表单的init事件
PUBLIC n
n=0
2)“确定”按钮的click事件
user=ALLTRIM(thisform.text1.Value)
psw=ALLTRIM(thisform.text2.Value)
LOCATE FOR 帐号=user AND 密码=psw
IF FOUND() THEN
MESSAGEBOX("欢迎进入本系统！",0+64,,"欢迎")
ELSE
n=n+1
IF n=3 THEN
MESSAGEBOX("密码已输入三次，禁止进入！",0+48,"提示")
thisform.Release
ELSE
MESSAGEBOX("密码错误，请重新输入！",0+48,"提示")
ENDIF
ENDIF
一
（1）Form1的Init事件代码：
thisform.timer1.enabled=.t.
（2）Timer1的Timer事件代码：
thisform.caption='计时：'+time()
if thisform.label1.fontsize=60
thisform.label1.fontsize=9
else
thisform.label1.fontsize=thisform.label1.fontsize+1
endif
二
(1) 表单form1的init事件代码：
set century on
thisform.timer1.enabled=.t.
(2)计时器控件timer1的timer事件代码：
thisform.text1.value=alltrim(str(year(date())))+'年'+alltrim(str(month(date())))+'月'+alltrim(str(day(date())))+'日'
thisform.text1.value=time()
thisform.label2.visible=.T.
t=alltrim(thisform.text1.value)
b=""
n=len(t)
for i=n to 1 step -1
b=b+subs(t,i,1)
endfor
thisform.label2.caption=b
在Dblclic 里面
thisform.release
逆序显示按钮的CLICK事件
lcInput = alltrim(thisform.text1.text)
lcOutput = ""
for i= len(lcInput) to 1 step -1
lcOutput = lcOutput + substr(lcInput,i,1)
Endfor
thisform.label2.caption = lcOutput
表单的CLICK事件
Thisform.Release
庄饶维血： 我可以说是一个VFP程序开发的高手了,给你个建议,不要用向导,因为向导产生的表单应用起来不方便,而且改不了,我都是自己设计表单的界面,向里加表格,标签,按钮,再向内写程序代码,你如果是个初学者,去买本VFP带实例的书,有光盘的,内有各种程序,而且还有代码,你自己试着改一改,用一用,试一试,再与书本一对照,保证你学会.
塔城地区13793355642： VFP设计表单？
庄饶维血： 关闭表单可以用thisform.release或release thisform 输入密码显示*只需将文本框的PasswordChar属性设置为* 或者用代码:thisform.text1.PasswordChar=＂*＂
塔城地区13793355642： vfp表单设计？
庄饶维血：如图: 在有等号的那个命令按钮的CLICK事件中写如下下代码即可达到要求: Thisform.text3.Value=EVALUATE(TRANSFORM(Thisform.Text1.Value)+SUBSTR([+-*/],Thisform.optiongroup1.Value,1)+TRANSFORM(Thisform.text2.Value)) 特别注意:所有文本框请输入默认值 0.00,选项按钮默认值不可为0(1~4).
塔城地区13793355642： VFP表单的设计？
庄饶维血： 先试试刷新表格:thisform.grid1.refresh .如果还不行建议用语句 SET FILTER TO ;SET FILTER TO 影片名称=ypmc and 放映日期=fyrq 或者改用查询语句(select ...)来实现.
塔城地区13793355642： VFP 表单代码设计 - ？
庄饶维血： 在init事件 select 名称,工资,奖金 from table 计算 工资+ 奖金 向前 SKIP -1 向后 SKIP
塔城地区13793355642： 求一个 简单的vfp表单程序设计实例!!! - ？
庄饶维血： 就教你做个登陆器 建: 点label按钮,建label1 的 caption为 QQ登陆 label2 的 caption为 密码 点combo按钮,建combo1 点text按钮,建立text1 点command按钮,建 command1 的 caption为 登陆 command2 的 caption为 退出双击command1 中...
塔城地区13793355642： 求vfp的表单设计程序怎么编 - ？
庄饶维血： CLICK事件.TEXT1建一表单FORM1;、平时着装尺寸等;如果是时装类YY.TEXT1用于输入1.COMMAND1、体重,再FORM1里添加3个文本框和一个按钮、价廉物美.TEXT1,购买时认真咨询卖家.REFRESH 网上购物最大的缺点就是不能试穿....
塔城地区13793355642： VFP设计 -- 表单？
庄饶维血： 在information.scx下写代码: do form borrowedit.scx
塔城地区13793355642： VFP表单设计？
庄饶维血： 1.Label textbox button 2.this.close() 3.text3.text=convert.toint32(this.textbox1.text)*convert.toint32(this.textbox2.text) 4.text属性 name 属性 5.fontsize
