设计查询学生信息的函数和学生成绩统计程序

基本原理和这租判个通讯录数据处理程序相似，提问者稍加修改就可以使用。

clear

set safe off

use txl

text

※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※

※ 1.输入 2.修改升哗 3.插入 4.删除 ※

※ 5.按姓名升序显示 6.按邮政编码升序显示 ※

※ 7.按姓名查询 8.退出 ※

※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※

endtext

input "请按数字键选择" to aa

do case

case aa=1

go bott

accept "请输入姓名：" to xm

accept "请输入性别：" to xb

accept "请输入电话号码：" to dhhm

accept "请输入家庭住址：" to jtzz

accept "请输入工作单位：" to gzdw

accept "请输入邮政编码：" to yzbm

repl 姓名 with xm,性别 with xb, 电话号码 with dhhm,家庭住址 with jtzz,工作单位 with gzdw,邮政编码 with yzbm

case aa=2

input"请输入您要修改的记录的编号：" to c

go c

? "请修改第"+str(c,1)+"个人的数据！"

disp

accept "请输入姓名：" to xm

accept "请输入性别：" to xb

accept "请输入电话号码：" to dhhm

accept "请输入家庭住址：" to jtzz

accept "请输入工作单位：" to gzdw

accept "请输入邮政编码：" to yzbm

repl 姓名 with xm,性别 with xb, 电话号码 with dhhm,家庭住址 with jtzz,工作单位 with gzdw,邮政编码 with yzbm

case aa=3

append blank

accept "请输入姓名：" to xm

accept "请输入性别：" to xb

accept "请输入电话号码：" to dhhm

accept "请输入家庭住址：" to jtzz

accept "请输入工作单位：" to gzdw

accept "请输入邮政编码：" to yzbm

repl 姓名 with xm,性别 with xb, 电话号码 with dhhm,家庭住址 with jtzz,工作单位 with gzdw,邮政编码 with yzbm

case aa=4

input "请输入您想要删除的记录号" to d

go d

delete

accept "确认删除请按小写字母y,否则取消删除）" to e

if e="y"

pack

else

recall

endif

case aa=5

index on 姓名 to xm

list

case aa=6

index on 邮政编码 to yzbm

list

case aa=7

accept "请输入您要查询的姓名" to f

list for 姓名=f

case aa=8

wait "系统即将关闭" window timeout 3

exit

othe

messagebox("请重新选择",0+64,"出错了")

endc

set safe on

*这个程序能完成任务，不过界面不好。可以这样修改：

*新建一个表单（主表单，表单1），增加8个按钮，每个按钮的名称caption同上面程序中的菜单；再增加一个按钮,caption为“退出”，保存表单1。

*新建一个数据处理表单（表单2）弊笑改，向表单添加标签，caption为“姓名”，再增加一个文本控件text1,用来处理“姓名”数据；继续向表单添加标签，caption为“性别”，增加一个文本控件text2,用来处理“性别”数据；.........向表单添加标签，caption为“邮政编码”，再增加一个文本控件text6,用来处理“邮政编码”数据。把标签和文本控件适当整理齐整。增加一个按钮，caption 为“保存”，再增加一个按钮，caption为“退出”，

双击表单空白处，出现load事件，输入

thisform.text1.value=xm

thisform.text2.value=xb

thisform.text3.value=dhhm

thisform.text4.value=jtzz

thisform.text5.value=gzdw

thisform.text6.value=yzbm

输入完毕，关闭load事件，这是给表单2的几个控件赋初值。

双击“退出”按钮，输入

thisform.release

关闭事件，双击“保存”按钮，输入

repl 姓名 with thisform.text1.value,

性别 with thisform.text2.value,

电话号码 with thisform.text2.value,

家庭住址 with thisform.text2.value,

工作单位 with thisform.text2.value,

邮政编码 with thisform.text2.value

保存表单2。

打开表单1，双击表单的空白处，出现load事件，输入：

set safe off

use txl

public xm,xb,dhhm,jtzz,gzdw,yzbm

双击“输入”按钮，输入

go bott

*下面给表单2赋初值

xm=姓名

xb=性别

dhhm=电话号码

jtzz=家庭住址

gzdw=工作单位

yzdm=邮政编码

do form 表单2

双击“修改”按钮，输入

input"请输入您要修改的记录的编号：" to c

go c

*下面给表单2赋初值

xm=姓名

xb=性别

dhhm=电话号码

jtzz=家庭住址

gzdw=工作单位

yzdm=邮政编码

do form 表单2

双击“插入”按钮，输入

appe blank

*下面给表单2赋初值

xm=姓名

xb=性别

dhhm=电话号码

jtzz=家庭住址

gzdw=工作单位

yzdm=邮政编码

do form 表单2

双击“删除”按钮，输入

input "请输入您想要删除的记录号" to d

go d

delete

accept "确认删除请按小写字母y,否则取消删除）" to e

if e="y"

pack

else

recall

endif

双击“按姓名升序显示”按钮，输入

index on 姓名 to xm

brow

双击“按邮政编码升序显示”按钮，输入

index on 邮政编码 to yzbm

brow

双击“按姓名查询”按钮，输入

accept "请输入您要查询的姓名" to f

brow for 姓名=f

双击“退出”按钮，输入

close data

set safe on

thisform.release

自考大专的程序是怎样的？

网上报名流程

登陆本地通过自学ks在线报名网址(新生需申请注册并提交有关信息，考生按照自己之前的账户登录)。到自考办官网网址所规定的特定银行申请一张交费用储蓄卡。办yhk后新生，与有yhk老考生依照报考网站所规定的报名条件进行在线报名。在线报名完成后，新生需在规定时间内到自考办公室指定地点照相，办理入学证。

当场报名条件

新生持身份z(士兵持q证或师级之上企业有效证件)(18周岁以下，有户口簿)去当地市、县自学ks办公室(备案站)资格审查登记。与此同时带上2b铅笔或蓝黑色笔签名笔(用以填好设备读登记表)，交了多个照片(约4-5张)，照片底端同样，无冠。依据工作员提示缴纳费用，并领到打印考试通知书，通知书上面有考试日期、考试室和座号。在考务处指定时长领到新授予的入校资格证书。

广东商务管理自考成绩如何查询？

1、官细微程序流程查询

考生关心广东省教育考试院微信公众号(ID：gdsksy)，在网页底端挑选“微信小程序”栏，点击查看“广东省教育考试院”微信小程序，就可以查询考试考试成绩。

2、微信开发平台查询方法

根据百度搜索App搜索“广东省教育考试院”，开启“广东省教育考试院—智能小程序”，点一下“考试考试成绩”查询考试成绩。

3、广东省自考管理系统查询

键入考生号和密码登录广东省自学ks智能管理系统，查询考试成绩合格和本次考试违规处理状况。

4、“广东招录线上”微信小程序查询

考生可搜索微信进到“广东招录线上”微信小程序，点一下“考试成绩查询”，挑选考生相对应的考试类型，按提醒查询考试考试成绩。

商务管理的有哪些专业优点？

1、不考高等数学、英文能考并不考

2、学科非常少，必考11门，专科一切学什么专业也不还要加考。

3、考试机会多，一年考3次嫌顷，一次4科，正常情况下一年考过申请毕业。

4、名牌大学，毕业学校可选咐虚择性多：深圳大学、华南农业大学、广东财经大学、华南理工大学、暨南大学、广东外语外贸大学、华南师范大学七选一。

5、教学方式品种多，成功率高

6、就业前景普芹简陆遍，高薪就业，毕业之后适宜于外资公司、跨国企业、国际金融机构、工贸公司、商贸公司、科贸公司、货物进出口公司、国际国内融资企业、银行、保险公司、财务公司等有关单位任职。

---