- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 窗口控件显示问题求助 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=172531)
-- 发布时间：2021/10/18 9:37:00
-- 窗口控件显示问题求助
已经完成的部分
1.在 星期课程表_Click 有如下代码
Dim rr As Row \'当前选中的行
rr = Tables("星期课程表").Current
Dim bh As String = rr("星期") + " " + rr("时段") + " " + "(" + format(rr("上课时间"),"HH:mm") + "-" + format(rr("下课时间"),"HH:mm") + ")"
kctitle = bh
2，打开窗口控件的时候 点击星期课程表的（当前行） 控件 Label2 可以动态显示 在窗口模式下每次点击当前行 的信息。
下载信息 [文件大小： 下载次数： ] 
点击浏览该文件:课程显示.foxdb
-- 发布时间：2021/10/18 9:45:00
--
代码放到currentchanged事件
Dim rr As Row = e.Table.Current
If rr IsNot Nothing AndAlso Forms("星期课程表窗口").Opened Then
Forms("星期课程表窗口").Controls("Label2").text = rr("星期") + " " + rr("时段") + " " + "(" + format(rr("上课时间"),"HH:mm") + "-" + format(rr("下课时间"),"HH:mm") + ")"
End If