帮我看一下这个纵向垂直进度条类有没有恶意的行为
Imports System
Imports System.Windows.Forms
Public Class MTech010VerticalProgessBar
Inherits ProgressBar
Protected Overloads 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