2、在项目窗口里的代码选项卡的程序里新建prg文件
3、在新建的prg文件上右键,d出菜单选设置主文件
注谈激:你新含棚袜建的prg文件要是没有内容的话,可以粘贴如下代码:
x=Val(Inputbox("请输入一和好个数:","测试"))
If x>0
Y=x*x
Endif
If x=0
Y=100
Endif
If x<0
Y=x*10
Endif
Messagebox("Y="+Transform(Y),0+64,"输出")
呵呵~~~
如果你想把程序中执行握斗的命令导出来念桥:在你的主程序中加入以下两行命令(加在最前面,如果这两个SET原来已有要修改):
SET DOHISTORY ON
SET DEBUGOUT TO d:\CmdList.txt &&文件路径和文件名随便起
这样程序运行过程中执行的所有命令都会保存到d:\CmdList.txt中了
如果你只想新建程序文件:
启动VFP后,在“文件”菜单中选“新建”,在d出的“新建”对话框中选“程序”,然后按“新建”按钮就可以了。
当然也可以用 *** 作系统的记事本,将命令写入后,保存时将文件名仔皮猛的后缀改为.prg就可以。
最简单的方法:在表单初始化(Init)事件中写入:
public logic
logic=<密码>
在Text1的属性passwordchar中输入“*”(引号不要段槐誉输入)
建立一个命令按钮,此按明晌钮的caption属性为“登握段录”
Click事件中写入:
If Thisform.text1.value=Logic
thisform.label2.caption="验证成功"
Else
thisform.label2.caption="登录失败"
endif
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)