在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）样式值公共常数（& H4），而不是使用一个神奇的数字在这样的代码。