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

Question

我正在尝试找到一种在 VB.NET Windows 应用程序中创建垂直进度条的方法。我看到了这篇文章，但它是用 C# 编写的，因此对我没有太大帮助。任何人都可以帮忙吗？

谢谢！

Answer 1

为什么 C# 答案对您没有帮助？我通过代码转换器运行它，它立即工作：

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) 样式值 (&H4) 真正定义一个公共常量，而不是在这样的代码中使用幻数。