***班级查询按钮的 Click事件代码***
local lcBj
m.lcBJ = allt(thisform.combo1.value)
ThisForm.Grid1.RecordSource = ""
Select * from ydy where allt(bj) = m.lcBj into cursor ydcj_
Thisform.LockScreen = .t.
ThisForm.Grid1.RecordSource = "ydcj_"
ThisForm.Grid1.RecordSourceType = 1
ThisForm.Grid1.Init()
ThisForm.LockScreen = .f.
***人员查询按钮的 Click事件代码***
local lcXm
m.lcXm = allt(thisform.text1.value)
ThisForm.Grid1.RecordSource = ""
ThisForm.Grid1.Init()
ThisForm.LockScreen = .f.
报表打印模块下有:学生信息打印和学生成绩打印2个功能
学生信息打印和学生成绩打印是对学生信息和成绩进行打印输出功能。
学生信息打印界面如下图所示
***打印按钮的 Click事件代码***
report form ydy environment preview
***退出按钮的 Click事件代码***
thisform.release
学生成绩打印界面如下图所示
上一页 [1] [2] [3] [4] [5] [6] [7] [8] [9] [10] 下一页