vb各种字体代码（vbs代码用什么字体）

今天给各位分享vb各种字体代码的知识，其中也会对vbs代码用什么字体进行解释，如果能碰巧解决你现在面临的问题，别忘了关注本站，现在开始吧！

本文目录一览：

• 1、问下一些常用字体的VB代码
• 2、vb换字体的变成代码应该是什么？
• 3、vb点击按钮修改字体代码
• 4、VB怎么用代码设置字体字号还有字体颜色？

问下一些常用字体的VB代码

Label1.FontName="黑体"

Label1.FontName="楷体"

Label1.FontName="方正准圆"

这样就可以了

当然要求你的电脑中存在这些你设定的字体。

vb换字体的变成代码应该是什么？

VB6.0换字体的程序代码是对对象的FontName 属性赋值：

FontName 属性，返回或设置在控件中或在运行时画图或打印操作中，显示文本所用的字体。

该属性的缺省值取决于系统，Visual Basic

中可用的字体取决于系统的配置、显示设备和打印设备。与字体相关的属性只能设置为真正存在的字体的值。

在运行时，可以用 FontCount 和 Fonts

属性获得系统可用字体的信息。

FontCount 属性，返回或设置当前显示设备或活动打印机可用的字体。

获取可用字体信息代码：

Private Sub Command1_Click()

  Dim I   ' 声明变量.

  For I = 0 To Printer.FontCount - 1  ' 确定字体数.

      List1.AddItem Printer.Fonts(I)    ' 把每一种字体放进列表框.

  Next I

End Sub

vb点击按钮修改字体代码

字体为黑体：text1.font="黑体"

字体大小为24：text1.fontsize=24

字体倾斜：text1.fontitalic=true

字体加粗：text1.fontbold=true

VB怎么用代码设置字体字号还有字体颜色？

在VB6中可以通过设置对象的Font属性设置字体字号，ForeColor属性设置字体颜色。\x0d\x0a例如，下面代码实现设置文本框中的字体为”隶书“字号28磅，字体颜色为红色\x0d\x0aPrivate Sub Command1_Click()\x0d\x0aText1.Font.Size = 28\x0d\x0aText1.Font.Name = "隶书"\x0d\x0aText1.ForeColor = vbRed\x0d\x0aEnd Sub

关于vb各种字体代码和vbs代码用什么字体的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站。