在vb.net中创建垂直进度条

Question

我试图找到一种在VB.NET Windows应用程序中创建垂直进度条的方法。我看到了this post，但它在C＃中，因此对我来说并没有那么大的帮助。有人可以帮忙吗？

谢谢！

Answer 1

为什么C＃答案不能帮到你？我通过a code converter运行它，它立刻就可以了：

Public Class VerticalProgressBar
    Inherits ProgressBar
    Protected Overrides ReadOnly Property CreateParams() As CreateParams
        Get
            Dim cp As CreateParams = MyBase.CreateParams
            cp.Style = cp.Style Or &H4
            Return cp
        End Get
    End Property
End Class

修改
虽然您应该为（PBS_VERTICAL）样式值（＆amp; H4）定义一个公共常量，而不是在代码中使用幻数。