من فضلكم . ما اسم هذه الخاصية (مرفق صوره)

أما أنها ليبل وقد تم وضع خاصية Enabled الى false

أو أن تكون فعلا ( طباعة ) وأنه تم تغيير اللون كما يشبه الصورة أعلاه .

Print "عماد"

iemad كتب:

أما أنها ليبل وقد تم وضع خاصية Enabled الى false

أو أن تكون فعلا ( طباعة ) وأنه تم تغيير اللون كما يشبه الصورة أعلاه .

Print "عماد"

←

اشكرك على التجاوب ولكنى قبل طرح السوال قمت بمشاهده جميع خيارات الــ Label

وقد قمت بتجربة خاصية Enabled الى false وفعلا كانت النتيجة متقاربة بعض الشى لكن ليس كما بالصوره

لكن اجهل ما تكلمت عنه بخصوص الطباعه ..

لكنى اعتقد انها اداءه منفرده مثل Label وغيرهااا

ارجو الافاده ولكم جزيل الشكر

mohamed.fadel كتب:

اشكرك على التجاوب ولكنى قبل طرح السوال قمت بمشاهده جميع خيارات الــ Label

وقد قمت بتجربة خاصية  Enabled الى false وفعلا كانت النتيجة متقاربة بعض الشى لكن ليس كما بالصوره

لكن اجهل ما تكلمت عنه بخصوص الطباعه ..

لكنى اعتقد انها اداءه منفرده مثل Label وغيرهااا

ارجو الافاده ولكم جزيل الشكر

←

اخل العزيز

قم بتغيير الخاصيه Enabled الى false

والخاصيه Flat Style الى System

ملاحظه هذا الطريقه جربتاه الان على نسخه 2005

وطلعت زي الي انت وضعتها بالصوره بالظبط

هذا كود بسيط لعمل المطلوب بجودة عالية

Private Sub Command1_Click()
WriteWord "Hi ArabTeam 2000 Forums  ãÍãÏ Prof_1982"
End Sub

Public Sub WriteWord(swText As String)
Me.AutoRedraw = True
Me.CurrentX = 1015
Me.CurrentY = 1015
Me.ForeColor = RGB(255, 255, 255)
Print swText


Me.CurrentX = 1000
Me.CurrentY = 1000
Me.ForeColor = RGB(128, 128, 128)
Print swText


End Sub