管理信息系统课程设计(10)

电子商务 With 0,c语言With 0,总分 With 0,平均分 With 0 Replace 学号 With "" Endif

Thisform.GrdTx.Column1.Text1.SetFocus 运行过程如下：

单击输入键在表单的最后一条记录后出现一条新的记录，记录内容为空，这是就可以对这条新记录进行输入，同时也可以对其他的记录进行修改，如图8。

图 8 输入运行表

2． 查询按钮的代码：

运行过程如下：首先 项目管理器中建立程序，并输入如下代码： Replace All 总分 With 英语+高数+管理运筹学+电子商务+c语言 Replace All 平均分 With 总分/5

Average All To c1,c2,c3,c4,c5,c6,c7 For 学号<>"0920014026" Locate All For 学号="0920014026"