سلام
نرم افزاری که با .Net Framework در ویندوز 7 برای فونت آزمایش کردم بالاخره با این روش خطاش برطرف شده و اجرا شد....
Untitled.jpg
استفاده از کلاس PrivateFontCollection:
Imports System.Drawing.Text
Public Class Form1
Dim Collection As New PrivateFontCollection
Private Sub Form1_Load(sender As Object, e As System.EventArgs) Handles Me.Load
For Each File As String In IO.Directory.GetFiles(".\Fonts", "*.ttf")
Collection.AddFontFile(File)
Next
Me.Font = New Font(Collection.Families(0), 12, FontStyle.Bold)
Me.Label2.Font = New Font(Collection.Families(1), 12, FontStyle.Bold)
End Sub
End Class





پاسخ با نقل قول
