主程序怎么写

if是条件语句，当满足该条件是，则执行该条件语句下的语句或语句体，如果是语句体的话，记得要用“ { }”括起来，for是循环语句，例如 for(i=0;i<10;i++)；第一个语句i=0是将i的值初始化，第二个语句i<10是条件语句，当i的值为假时则停止，也就是说这里的i=9时停止循环，（当缺省条件语句是，则是无限循环）第三个语句i++是控制变量，每次循环后i的值+1，直到循环结束为止（当缺省控制变量的语句时，则是死循环）

最后要注意：for循环语句中，条件语句可以省略，但是分号不能省略，也不能用其他标识符代替，例如for(i=0;;i++)；是正确的，for(i=0,i++)；是错误的。

**设置运行环境

Set Talk Off &&关闭命令显示

Set Escape Off &&禁止运行的程序在按 Esc 键后被中断

Set Exclusive Off &&数据库表以共享方式打开

Set Deleted On &&过滤掉已带删除标记的记录

Set Safety Off &&指定在改写已有的文件时不显示对话框

Set Date Ansi &&设定日期的年份为 4 位数

Set Century On &&指定日期表达式的显示格式为YY.MM.DD

SET MARK TO [-] &&指定日期的分隔符为"-"

SET SECONDS ON &&日期时间表达式的显示秒钟部分

SET HOURS TO 12 &&指定日期时间表达式的显示为12小时格式

Set Optimize ON &&启用或废止 Rushmore 优化。

Set ENGINEBEHAVIOR 70

Set DECIMALS TO 8 &&指定小数点位数，默认为2位

Clear &&清除主窗口

Clear All &&清除变量

**开始进行程序的事务处理操作

Public pcSys

pcSys=Sys(5)+Sys(2003)

Set Default To pcSys

Set Path To Class,Form,Poto,Menu,Prg,Report

DO form frmbegin &&运行启动画面表单frmBegin，名称自己改，

READ events

DO form frmlogin &&运行主界面表单frmlogin，名称自己改，

READ events

保存，名称自己安，然后设置为主文件.