此主题相关图片如下:jdfw.gif
提前给大家拜个早年
20140205:
放假闲的没事,参考程版的思路,做一个合计行固定,一并放在这里,
20140206:
加上一个类似QQ的窗体样式,靠上边自动隐藏。只是一个方法,界面随便做的。
哎!假期就怎么结束了,老老实实干活喽。
如果是窗体表,将
Dim tb As Table = e.Form.Controls("Table1").TableAddHandler tb.grid.Paint, AddressOf Grid_Paint
tb.Grid.Name = tb.Name
复制到窗口的 AfterLoad 事件中(别忘了修改实际的控件名)
按住Ctrl键,点击标签可以进入设计状态;可以自由拖动;顶住上边,鼠标离开可以自动隐藏