+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم قواعد البيانات (http://vb4arb.com/vb/forumdisplay.php?fid=40)
+--- قسم : قسم اسئلة vb6.0 المتعلقة بقواعد البيانات (http://vb4arb.com/vb/forumdisplay.php?fid=72)
+---- قسم : قسم اسئلة التقارير والطباعة للغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=73)
+---- الموضوع : حل ل Right To Left في Active report (/showthread.php?tid=8659)
حل ل Right To Left في Active report - mamas1 - 26-04-13
هل هناك حل
أو أداة تدخلها للتقرير بها هذه الخاصية؟؟؟
حل ل Right To Left في Active report - mamas1 - 26-04-13
اليكم الحل بعد كثير من البحث
PHP كود :
Private Sub Detail_Format()
Field8.Text = Chr(254) & Field8.Text
End Sub
أو إذا أردت أن يقوم بذلك مباشرة لكل التقرير
PHP كود :
Dim i As Long
For i = 0 To Detail.Controls.Count - 1
If (TypeName(Detail.Controls(i)) = "Field") Then
Detail.Controls(i).Text = Chr(254) & Detail.Controls(i).Text
ElseIf TypeName(Detail.Controls(i)) = "Label" Then
Detail.Controls(i).Caption = Chr(254) & Detail.Controls(i).Caption
End If
Next
بحيث أن Detail هي إسم Section المراد تحويلها
بالتوفيق ..