هل من الممكن جعل اداة FileListBox تظهر اسماء الملفات على الجهة اليمين مرفق مثال + صورة للتوضيح

استخدم هذا الكود لجعل أي Control لا يدعم الاتجاه من اليسار الى اليمين

Private Declare Function GetWindowLong Lib "USER32" Alias "GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long) As Long
Private Declare Function SetWindowLong Lib "USER32" Alias "SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Private Const WS_EX_LAYOUTRTL = &H400000
Private Const GWL_EXSTYLE = (-20)

Private Sub Form_Load()
SetRtoL Dir1
SetRtoL File1
End Sub


Public Sub SetRtoL(Ctl As Control)
Ctl.Visible = False
SetWindowLong Ctl.hwnd, GWL_EXSTYLE, GetWindowLong(Ctl.hwnd, GWL_EXSTYLE) Or WS_EX_LAYOUTRTL
Ctl.Visible = True
End Sub

جزاك الله كل خير زبط معي

الله يزيد من علمه

والله يعطيك الف عافية