VB点虐 中如何在代码中设置文本框字体的大小

Private Sub RadioButton1_CheckedChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles RadioButton1.CheckedChanged

创新互联专注于阳明企业网站建设,成都响应式网站建设公司,商城网站开发。阳明网站建设公司,为阳明等地区提供建站服务。全流程定制制作，专业设计，全程项目跟踪，创新互联专业和态度为您提供的服务

Dim a As FontStyle

a = Me.TextBox1.Font.Size

Dim b As Single = a * 10

Me.TextBox1.Width = Me.TextBox1.Width * 10

Me.TextBox1.Font = New System.Drawing.Font("PMingLiU ", b, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) '放大10倍，若仅10号字体，则将b改为10

End Sub

vb代码窗口字体大小如何设置

1、首先，点击菜单栏中的工具按钮。

2、然后点击二级菜单的选项。

3、此时，便可以看到选项页面。

4、接下来点击编辑器格式。

5、在接下来就可以在这里设置字体大小。

6、最后，点击确定按钮即可保存。

7、完成效果图。

vb点虐 代码调整字体大小

看样要重新定义个Font对象，在构造函数中定义它的大小，

With Button1.Font

Button1.Font = New Font(.FontFamily, 34, .Style, .Unit) '参数都用原来字体参数，只有大小改成你需要的。

End With

文章名称：vb点虐 中字体大小 vb中字体大小的代码怎么写
文章位置：http://scyanting.com/article/ddiegec.html