在缴费信息窗口 有学员信息控件 学号 姓名 等控件
学号控件绑定了,DropDownForm 学员信息列表窗口
打开缴费信息窗口,点击学号,获取 DropDownForm 学员信息列表窗口 (正常)
选择相应人员填入学号(正常)
填入相关其他人员信息 (错误,现在只能填入学号)
相关代码如下.
在DropDownForm 学员信息列表窗口 DropDownClosed事件写入以下代码
Dim tbl As Table = Tables("学员列表窗口_学员信息列表")
If tbl.Current IsNot Nothing Then
e.Form.DropDownBox.Value = tbl.Current("学号")
Tables("学员管理_学员信息表").Current("姓名") = tbl.Current("姓名")
If e.Form.DropTable IsNot Nothing Then '如果是通过表下拉的
e.Form.DropTable.FinishEditing()
Else '如果是通过窗口下拉的
e.Form.DropDownBox.WriteValue()
End If
End If
在DropDownForm 学员信息列表窗口 的table 控件 的 DoubleClick事件写入以下代码
Dim tbl As Table = Tables("学员列表窗口_学员信息列表")
If tbl.Current IsNot Nothing Then
e.Form.DropDownBox.Value = tbl.Current("学号")
End If
e.Form.DropDownBox.CloseDropDown()
帮忙看看错在什么地方,谢谢.