right to left كردن كنترل Rich Text Box

سلام
مي‌خواستم ببينم چجوري مي‌تونم كنترل Rich Text Box رو right to left . توجه كنيد كه گفتم right to left نه Right justify.

من اين راه پايين رو امتحان كردم ولي نشد.!!!
يعني شد، ولي ديگه چيزايي كه توي كنترل نوشته مي‌شد ديده نمي‌شد و به جاي متن تصويري كه اون لحظه در محل لود شدن فرم بود مي‌اومد جاي كنترل. (يه جورايي قاط مي‌زد) :41:

[HTML]Public Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hWnd As Long, ByVal nIndex As Long) As Long
Public Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hWnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long

Public Const ws = &H400000
Public Const gw = -20

Private Sub Form_Load()
wl = GetWindowLong(rtb.hWnd, gw)
SetWindowLong rtb.hWnd, gw, wl Or ws
End Sub[/HTML]

مثل اينكه كسي نمي‌خواد جواب اين سوال رو بده!! نه ؟ !!!

از دوستان اگه كسي لطف كنه جواب منو بده ممنون مي‌شم.

يعني هيچ راهي نداره كه بشه اينو right to left كرد؟