برای تعیین مشخصات یه فونت (name,size,style) توی گزارش با کد نویسی این کارهایی که میگم رو انجام بده . اگه جواب نگرفتی بهم ایمیل بزن .
در ابتدا متغیر rp را از نوع list_report (نام فرم گزارش طراحی شده) تعریف کن
Dim rp As list_report = New list_report
فرض می کنیم یه TextObject توی محیط طراحی گزارشت اضافه کردی به اسم Text1
کد زیر را برای کار با مشخصات فونت Text1 در یه جای مناسب بنویس
Dim txt1 As CrystalDecisions.CrystalReports.Engine.TextObject
txt1 = rp.ReportDefinition.ReportObjects("Text1")
txt1.Text = "متن نمونه"
Dim myFontStyle As FontStyle
myFontStyle = FontStyle.Regular
Dim myfont As Font = New Font(font_name,font_size,myFontStyle,GraphicsUnit. Pixel)
txt1.ApplyFont(myfont)
در انتهای کار هم وقتی همه تنظیمهای خط و باکس و فونت و ... تموم شد rp رو جایگزین کن.
CrystalReportViewer1.ReportSource = rp
البته باید حواست باشه با توجه به اینکه عرض و ارتفاع TextObject موقع طراحی یه چیزی تعریف میشه ممکنه فونتی که استفاده می کنی توی اون ابعاد نگنجه یا زیادی ریز باشه بنابر این باید ابعاد TextObject رو به تناسب ابعاد فونت تغییر بدی تا موقع نمایش گزارش زشت نشه. اگه مشکل پیدا کردی بگو تا اونم برات توضیح بدم.