سلام دوستان وقت بخیر.
شاید برای شما هم پیش اومده باشه که بخواین یک پروسس بار رو از افقی به شکل عمودی در بیارین
ابتدا مثل شکل زیر وارد صفحه فرم دیزاین وی بی میشین و بعد یک پاپلیش کلاس تعریف میکنیم






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



بعد تکه کد زیر را عوض میکنیم







'.................................پروسس بار رو از اين حالت.................................

        Me.ProgressBar1 = New System.Windows.Forms.ProgressBar()

        '.................................به اين حالت در مي آريد.............................

        Me.ProgressBar1 = New VerticalProgressBar



Untitled.jpg