本文整理汇总了VB.NET中System.Windows.Media.Fonts.GetFontFamilies方法的典型用法代码示例。如果您正苦于以下问题：VB.NET Fonts.GetFontFamilies方法的具体用法？VB.NET Fonts.GetFontFamilies怎么用？VB.NET Fonts.GetFontFamilies使用的例子？那么恭喜您, 这里精选的方法代码示例或许可以为您提供帮助。
在下文中一共展示了Fonts.GetFontFamilies方法的4个代码示例，这些例子默认根据受欢迎程度排序。您可以为喜欢或者感觉有用的代码点赞，您的评价将有助于系统推荐出更棒的VB.NET代码示例。
示例1: familyName
' Return the font family collection for the selected directory location.
Dim fontFamilies As System.Collections.Generic.ICollection(Of FontFamily) = Fonts.GetFontFamilies("C:/MyFonts")
' Enumerate through the font family collection.
For Each fontFamily As FontFamily In fontFamilies
' Separate the URI directory source info from the font family name.
Dim familyName() As String = fontFamily.Source.Split("#"c)
' Add the font family name to the fonts combo box.
comboBoxFonts.Items.Add(familyName(familyName.Length - 1))
Next fontFamily
comboBoxFonts.SelectedIndex = 0示例2:
For Each fontFamily As FontFamily In Fonts.GetFontFamilies("file:///D:/MyFonts/")
' Perform action.
Next fontFamily示例3: Uri
For Each fontFamily As FontFamily In Fonts.GetFontFamilies(New Uri("pack://application:,,,/"))
' Perform action.
Next fontFamily示例4: Uri
For Each fontFamily As FontFamily In Fonts.GetFontFamilies(New Uri("pack://application:,,,/"), "./resources/")
' Perform action.
Next fontFamily