展开全部
_screen.caption="标题"
set talk off &&关闭对话框
set safe off &&关闭询问对话框
set stat on && 显示状态栏
set dele on &&忽略带有删除标记的记录
set cent on &&用四位数表示年份
set date to japan &&年月日格式
SET HOURS TO 24
close all &&关闭所有打开的数据库、表、索引
release window stand &&关闭标准工具栏
**用于设置路径
progpath=left(sys(16),rat("\",sys(16))) &&当前程序的当前路径
set defa to &progpath
datawj=progpath+"数据\数据1.dbc"
open database &datawj SHARED &&打数据库
set talk off &&关闭对话框
set safe off &&关闭询问对话框
set stat on && 显示状态栏
set dele on &&忽略带有删除标记的记录
set cent on &&用四位数表示年份
set date to japan &&年月日格式
SET HOURS TO 24
close all &&关闭所有打开的数据库、表、索引
release window stand &&关闭标准工具栏
**用于设置路径
progpath=left(sys(16),rat("\",sys(16))) &&当前程序的当前路径
set defa to &progpath
datawj=progpath+"数据\数据1.dbc"
open database &datawj SHARED &&打数据库
展开全部
第一个命名为main,内容如下:
_screen.caption="成绩统计程序注册码生成器"
*这里换成你想要在第一个表单上显示的标题
_screen.icon=""
_screen.visible=.f. &&去掉VF的主窗口
on shutdown do quit
do form main
*这里的main是你要最先运行的表单的名称
read events
_screen.caption="成绩统计程序注册码生成器"
*这里换成你想要在第一个表单上显示的标题
_screen.icon=""
_screen.visible=.f. &&去掉VF的主窗口
on shutdown do quit
do form main
*这里的main是你要最先运行的表单的名称
read events
追问
on shutdown do quit,提示“文件quit.prg不存在”,求解?
另外,问下,那个ON SHUTDOWN 原来就是指关主窗口上的叉呀?
追答
这一句是要执行quit这个程序文件,你可以不要这一句。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询