تغییر font

[h_baqery]

چطور می شه نوع فونت همه کنترلهای یه project رو در تمام دکمه ها و گریدها و ...
به صورت یکجا به tahoma تبدیل کرد.

[h_baqery]

اگه امکان نداره یا خیلی سخته بگید خودم دونه دونه تغییر بدم.

[Hossein Bazyan]

لازم نیست دونه دونه تغییر بدی
این کد را امتحان کن البته برای هر Form باید بنویسی یا بهتر بگم در Form_Load هر فرمت آنرا بذار در ضمن میتوانی اندازه فونت هم نغییر بدی مانند مثال :



Private Sub Form_Load()
Dim a As Control
On Error Resume Next
For Each a In Form1
a.FontName = "Tahoma"
a.FontSize = 10
Next
End Sub


برای فرمهای دیگه هم باید در خط For نام همان فرم را بنویسی
One Error باعث میشه اگه شی یی خاصیت FontName نداشت پیغام خطا نده و به شی بعدی بره

[vb study]

با نگه داشتن کلید کنترل و انتخاب همه ابزارهای مورد نظر وتغییر نوع فونت در پنجره خصوصیات

[Hossein Bazyan]

با نگه داشتن کلید کنترل و انتخاب همه ابزارهای مورد نظر وتغییر نوع فونت در پنجره خصوصیات
دوست عزیز ایشان از طریق کد نویسی گفته بودند

[h_baqery]

آخه چجوری همه کنترلهارو توی همه فرمها با کلید کنترل نگه دارم .
من vb کار نیستم و یه برنامه با حدود 100 فرم با کنترلهای مختلف دارم .
گفتم شاید مثل sqlServer که می شه از طریق sysObjects خصوصیات کلیه جداول و فیلدهارو به یه چیز خاص تغییر داد تو vb هم یه فایلی باشه که وقتی یه خصوصیتو توی اون تغییر می دی بقیه جاها هم تغییر می کنه.

[m_nejad]

یه راه اینه که (خودم امتحان کردم) نرم افزاری مثل advanced search and replace برای جستجو و جایگزینی متن داخل فایلها داشته باشی. بعد نام فونتهای قبلی را با فونت جدید replace کن (با یک عمل جستجو روی فولدر پروژه)

[h_baqery]

ممنونم حتما جواب می ده