4

我想知道是否可以为我的表单标签使用自定义字体而不将其安装在用户机器上?我想使用我有权使用的字体显示文本,但它没有安装在潜在的用户机器上。

有什么解决方案吗?

4

2 回答 2

8

这是摘录(使用PrivateFontCollection):

Dim pfc As New PrivateFontCollection()
pfc.AddFontFile("C:\Path To\PALETX3.ttf")
label1.Font = New Font(pfc.Families(0), 16, FontStyle.Regular)

从这里转换:加载并使用自定义字体而不安装它

另请检查:Embedding/deploying custom font in .NET app

于 2012-11-26T22:05:40.243 回答
1

在代码顶部添加此代码

Imports System.Drawing.Text

在 Form1_Load() 上添加此代码以更改 Labell1.Font

Dim customfont As PrivateFontCollection = New PrivateFontCollection
customfont.AddFontFile("C:\maven.ttf")
Label1.Font = New Font(customfont.Families(0), 10)

在 Visual Basic 2010 企业版上测试

于 2013-07-15T12:33:37.720 回答