Foxtable(狐表)用户栏目专家坐堂 → [求助]复选列表框设置高度BUG


  共有2508人关注过本帖树形打印复制链接

主题:[求助]复选列表框设置高度BUG

帅哥哟,离线,有人找我吗?
mxko
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:463 积分:3792 威望:0 精华:0 注册:2013/2/20 11:07:00
[求助]复选列表框设置高度BUG  发帖心情 Post By:2018/4/13 15:06:00 [只看该作者]

如题:CheckedListBox 控件

用Height设置高度后,再查,高度小了

代码如下:

Dim lsc As WinForm.CheckedListBox = Forms("窗口1").Controls("CheckedListBox1")
lsc.Height = 90
Output.Show(lsc.Height )

结果——

84


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/4/13 15:28:00 [只看该作者]

这个控件的高度,根据每项的高度处理的。

 

比如一行的高度是16,那么就有 84、100、116 这样的高度。


 回到顶部
帅哥哟,离线,有人找我吗?
mxko
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:463 积分:3792 威望:0 精华:0 注册:2013/2/20 11:07:00
  发帖心情 Post By:2018/4/14 15:42:00 [只看该作者]

非常感谢


 回到顶部
帅哥哟,离线,有人找我吗?
mxko
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:463 积分:3792 威望:0 精华:0 注册:2013/2/20 11:07:00
  发帖心情 Post By:2018/4/14 16:20:00 [只看该作者]

以下是引用有点甜在2018/4/13 15:28:00的发言:

这个控件的高度,根据每项的高度处理的。

 

比如一行的高度是16,那么就有 84、100、116 这样的高度。

请问,怎么样得到或设置 单行的 高度?


 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:112401 积分:572273 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/4/14 16:52:00 [只看该作者]

只能通过改变字体大小来设置

 回到顶部
帅哥哟,离线,有人找我吗?
mxko
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:463 积分:3792 威望:0 精华:0 注册:2013/2/20 11:07:00
  发帖心情 Post By:2018/4/16 9:00:00 [只看该作者]

以下是引用有点蓝在2018/4/14 16:52:00的发言:
只能通过改变字体大小来设置

那怎么获取呢?


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/4/16 9:07:00 [只看该作者]

以下是引用mxko在2018/4/16 9:00:00的发言:

那怎么获取呢?

 

比如,高度相差一点点没问题的吧?你现在要做什么?

 

Dim lsc As WinForm.CheckedListBox = e.form.Controls("CheckedListBox1")
lsc.font = new font("宋体", 13)
lsc.Height = 120
msgbox(lsc.Height )


 回到顶部
帅哥哟,离线,有人找我吗?
mxko
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:463 积分:3792 威望:0 精华:0 注册:2013/2/20 11:07:00
  发帖心情 Post By:2018/4/17 9:47:00 [只看该作者]

没问题,我要让用户自增 勾选行 然后重新 排版,非常感谢


 回到顶部