26-04-13, 09:28 PM
26-04-13, 09:42 PM
اليكم الحل بعد كثير من البحث
أو إذا أردت أن يقوم بذلك مباشرة لكل التقرير
بحيث أن Detail هي إسم Section المراد تحويلها
بالتوفيق ..
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 المراد تحويلها
بالتوفيق ..