| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]复选列表框设置高度BUG (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=117499) |
| -- 作者：mxko -- 发布时间：2018/4/13 15:06:00 -- [求助]复选列表框设置高度BUG 如题：CheckedListBox 控件 用Height设置高度后，再查，高度小了 代码如下： Dim lsc As WinForm.CheckedListBox = Forms("窗口1").Controls("CheckedListBox1")lsc.Height = 90 Output.Show(lsc.Height ) 结果—— 84 |
| -- 作者：有点甜 -- 发布时间：2018/4/13 15:28:00 -- 这个控件的高度，根据每项的高度处理的。
比如一行的高度是16，那么就有 84、100、116 这样的高度。 |
| -- 作者：mxko -- 发布时间：2018/4/14 15:42:00 -- 非常感谢 |
| -- 作者：mxko -- 发布时间：2018/4/14 16:20:00 -- 以下是引用有点甜在2018/4/13 15:28:00的发言：
这个控件的高度，根据每项的高度处理的。
比如一行的高度是16，那么就有 84、100、116 这样的高度。 请问，怎么样得到或设置 单行的 高度？ |
| -- 作者：有点蓝 -- 发布时间：2018/4/14 16:52:00 -- 只能通过改变字体大小来设置 |
| -- 作者：mxko -- 发布时间：2018/4/16 9:00:00 -- 以下是引用有点蓝在2018/4/14 16:52:00的发言：
只能通过改变字体大小来设置 那怎么获取呢？ |
| -- 作者：有点甜 -- 发布时间：2018/4/16 9:07:00 -- 以下是引用mxko在2018/4/16 9:00:00的发言：
那怎么获取呢？
比如，高度相差一点点没问题的吧？你现在要做什么？
Dim lsc As WinForm.CheckedListBox = e.form.Controls("CheckedListBox1") |
| -- 作者：mxko -- 发布时间：2018/4/17 9:47:00 -- 没问题，我要让用户自增 勾选行 然后重新 排版，非常感谢 |