vb.net Listbox控件横轴的进度条问题

vszys

于 2020-04-06 21:22:36 发布

阅读量333

点赞数 1

分类专栏： VB.NET 文章标签： windows winform vb.net

本文链接：https://blog.csdn.net/vszys/article/details/105351600

版权

VB.NET 专栏收录该内容

11 篇文章 0 订阅

订阅专栏

RT，直接上内容：

网络上查找了很久，还是MSDN比较给力，感谢大牛的指引，以下方式挺好用的；

Listbox.HorizontalScrollbar = "True"
Listbox.IntegralHeight = True
for i=0 to listbox.items.count-1
    Dim len As Integer=Val(Listbox.CreateGraphics().MeasureString(Listbox.Items(i).ToString(), .Font).ToString)
next
If neirongchangdu < len Then
   neirongchangdu = len
End If
Listbox.HorizontalExtent = neirongchangdu + 20

这样就可以加载横轴坐标了；

微软的介绍网址如下，大家也可以参考原文：

https://docs.microsoft.com/zh-cn/dotnet/api/system.windows.forms.listbox.horizontalextent?redirectedfrom=MSDN&view=netframework-4.8#System_Windows_Forms_ListBox_HorizontalExtent

效果如图：