以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  用这个方法记忆中间线的位置不管用,请老师指点  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=193050)

--  作者:xxfoxtable
--  发布时间:2024/8/12 22:22:00
--  用这个方法记忆中间线的位置不管用,请老师指点
用这个方法记忆不同电脑中间线的位置不管用,请老师指点
Dim sc3 As WinForm.SplitContainer = e.Form.Controls("SplitContainer3")
Tables("默认").Current("开方右面高度") = sc3.Panel1.Width
Tables("默认").Current.Save

Dim sc3 As WinForm.SplitContainer = e.Form.Controls("SplitContainer3")
sc3.SplitterDistance = Tables("默认").Current("开方右面高度")
[此贴子已经被作者于2024/8/12 22:22:54编辑过]

--  作者:有点蓝
--  发布时间:2024/8/12 22:29:00
--  
Tables("默认").Current("开方右面高度") = sc3.SplitterDistance