VFP表单问题..

2025-05-09 23:38:02

推荐回答（1个）

回答1：

只需要2个按钮：确定关闭
确定.Click()
Select 学号，姓名，性别，出生日期，籍贯，入学分 From STDA Where 学号 = alltrim(ThisFOrm.Txt学号.Value) Into Cursor Lsb
IF EOf('Lsb')
MessageBox("学号不存在！")
Else
Select Lsb
THisForm.Txt学号.value = Lsb.学号
ThisForm.Txt姓名.Value = Lsb.姓名
ThisForm.Chk性别.Value = Lsb.性别
......
Use In Lsb
EndIf
关闭.Click()
ThisFOrm.Release()