کمک- راست به چپ کردن چند شیع

[arman_Delta2002]

سلام من یه کد پیدا کردم که یک فرم رو کامل با تمام اشیاعش راست به چپ میکنه فقط مشکلم اینجاست که میخوام یک یا چند شیع رو واسم راست به چپ کنه نه کل اشیاء رو اینم کدش
تورو خدا کمک کنییین خیییلیی مههمه

Imports System.ComponentModel

Private Const WS_EX_LAYOUTRTL As Integer = &H400000

Private _mirrored As Boolean = False

<System.ComponentModel.Description("Change to the right-to-left layout."), DefaultValue(False), Localizable(True), Category("Appearance"), Browsable(True)> _
Public Property Mirrored() As Boolean
Get
Return _mirrored
End Get
Set(ByVal value As Boolean)
If _mirrored <> value Then
_mirrored = value
Me.Refresh()
MyBase.OnRightToLeftChanged(EventArgs.Empty)
End If
End Set
End Property

Protected Overrides ReadOnly Property CreateParams() As CreateParams
Get
If Me.Mirrored Then
Dim CP As CreateParams
CP = MyBase.CreateParams
CP.ExStyle = CP.ExStyle Or WS_EX_LAYOUTRTL
Return CP
Else
Return MyBase.CreateParams
End If
End Get
End Property

[ROSTAM2]

اشياء رو با يك شئ Panel گروه بندي كنيد براي راست به چپ كردن همه اون اشياء كافيه خصوصيت راست به چپ Panel رو تغيير بديد در مورد چند خصوصيت ديگه هم همينطوره مثل فونت ، فعال بودن ، پيدا بودن (Font, Enabled, Visible)

[arman_Delta2002]

اشياء رو با يك شئ Panel گروه بندي كنيد براي راست به چپ كردن همه اون اشياء كافيه خصوصيت راست به چپ Panel رو تغيير بديد در مورد چند خصوصيت ديگه هم همينطوره مثل فونت ، فعال بودن ، پيدا بودن (Font, Enabled, Visible)
درسته ولی شیع من یک کامپننت هست که به هیچ سراطی مستقیم نیست و فقط این کد بالا روش تأثیر داشت که بدبختانه کل فرم رو بر میگردونه