成都市树德中学 待遇:我用VFB6.0做了一个程序,但运行时出现问题,但我不知道错在那里,请高手帮助?
来源:百度文库 编辑:神马品牌网 时间:2024/10/05 22:36:13
代码如下:
set talk off
clear
?"********记录插入**************"
use 学生.dbf
k="Y"
do while .T.
accept "请输入姓名:" to xm
locate for 姓名=xm
if found()
?"用户名已经存在"
else
input "请输入在哪条记录插入?" to sm
go sm
insert blank before
accept"请输入学号:" to xh
accept "请输入性别:" to xb
accept "请输入总分:" to zf
replace 姓名 with= xm,学号 with=(val(xh)),性别 with=xb,总分 with=(val(zf))
?"插入记录成功"
endif
wait "是否继续?" to k
if upper(k)<>"Y"
exit
endif
enddo
use
set talk on
return
快啊,正急着用!
set talk off
clear
?"********记录插入**************"
use 学生.dbf
k="Y"
do while .T.
accept "请输入姓名:" to xm
locate for 姓名=xm
if found()
?"用户名已经存在"
else
input "请输入在哪条记录插入?" to sm
go sm
insert blank before
accept"请输入学号:" to xh
accept "请输入性别:" to xb
accept "请输入总分:" to zf
replace 姓名 with= xm,学号 with=(val(xh)),性别 with=xb,总分 with=(val(zf))
?"插入记录成功"
endif
wait "是否继续?" to k
if upper(k)<>"Y"
exit
endif
enddo
use
set talk on
return
快啊,正急着用!
去编程里问啊
我用VFB6.0做了一个程序,但运行时出现问题,但我不知道错在那里,请高手帮助?
我用VFB6.0做了一个程序,但运行时出现问题,但我不知道错在那里,请高手帮助?
我编了一个二叉树的程序,但在运行时出现了一些小问题!
我写了一个能在桌面绘图的程序,但刷新出了点问题
运行一个游戏外挂程序,突然用不了了,出了个筐上面是THEMIDA
运行一个游戏外挂程序,突然用不了了,出了个筐上面是THEMIDA.
运行一个游戏外挂程序,突然用不了了,出了个筐上面是THEMIDA
我用VC编写了一个邮件发送程序,但运行时说没有创建任何配置文件,请问怎样创建呢?
我下载了一个程序,但为什么运行是错误的
我点击了一个程序但只有进程却不运行,请指点迷津