老师,新年好:
现有两个表,希望通过从“课题管理”表中,列表”课题信息“选择后,获得此表中的课题号,并写入”课题管理“表中,下公式不能连动,请指点。谢谢。
Dim ktjfly As WinForm.ComboBox = e.Form.Controls("课题经费来源信息")
Dim kth As WinForm.ComboBox = e.Form.Controls("子课题号")
ktjfly.ComboList = DataTables("课题管理").GetComboListString("项目信息", "负责人 ='" & Tables("设备经费管理").Current("PI") & "'")
Tables("设备经费管理").Current("子课题号") = Tables("课题管理").Current("课题号")