Private Sub RadioButton1_CheckedChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles RadioButton1.CheckedChanged
十余年的铅山网站建设经验，针对设计、前端、开发、售后、文案、推广等六对一服务，响应快，48小时及时工作处理。全网整合营销推广的优势是能够根据用户设备显示端的尺寸不同，自动调整铅山建站的显示方式，使网站能够适用不同显示终端，在浏览器中调整网站的宽度，无论在任何一种浏览器上浏览网站，都能展现优雅布局与设计，从而大程度地提升浏览体验。创新互联公司从事“铅山网站设计”,“铅山网站推广”以来，每个客户项目都认真落实执行。
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
看样要重新定义个Font对象，在构造函数中定义它的大小，
With Button1.Font
Button1.Font = New Font(.FontFamily, 34, .Style, .Unit) '参数都用原来字体参数，只有大小改成你需要的。
End With
1.
大部分空间都有fontsize属性，即字体大小，该属性可以复制，比如你原来用的是10大小的，在相应控件扩大了一定大小后
2.
VB
代码如下：
3.
dim yk as single,yg as single
dim bilig,bilik as single
sub form_load()
yk=form1.width
yg=form1.height
end sub
sub formresize事件
bilik=round(me.width/yk,1)
bilig=round(me.height/yg,1)
command1.height=command1.heigt*bilig
command1.width=command1.width*bilik
command1.fontsize=command1.fontsize*bilik
end sub
通过下面的方法进行修改：
TextBox1.Font = New Font("Arial", 16, FontStyle.Bold) 'Arial字体,大小:16,粗体
'TextBox1.Font = New Font("Arial", 16, FontStyle.Italic) 'Arial字体,大小:16,斜体
'TextBox1.Font = New Font("Arial", 16, FontStyle.Regular) 'Arial字体,大小:16,正常
'TextBox1.Font = New Font("Arial", 16, FontStyle.Strikeout) 'Arial字体,大小:16,删除线
'TextBox1.Font = New Font("Arial", 16, FontStyle.Underline) 'Arial字体,大小:16,下划线
TextBox1.ForeColor = Color.Red '前景色
VB.NET的简介
VB.net是微软最新平台技术，是.netframeworkSDK的一种语言。VB.net和VC#.net在功能上没有区别。编译以后生成的可执行文件被称为Assembly，即程序集。
VB.net的版本号是VisualBasic7.0，它的运行是建立在CLR(CommonLanguageRuntime)和MSIL(MicrosoftIntermediateLanguage)虚拟器上的。其实，它的机制和Java差不多。
VB.NET的特点
1.真正成为面向对象以及支持继承性的语言。
2.窗体设计器支持可视化继承，并且包含了许多新的特性，比如自动改变窗体大小、资源本地化支持、数据类工具内在支持XML数据。
3.直接建立在.NET的框架结构上，因此开发人员可以充分利用所有.NET平台特性，也可以与其他的.NET语言交互。
4.为Windows应用程序提供了XCOPY部署，开发者不再需要为DLL的版本问题担忧。
VB.net的语言特点：
1.代码托管。被托管的代码享受.netframework提供的安全保障和垃圾回收机制，但是这也同时表明，你的程序被框在Framework里面了。API变得不太方便。
2.强大的面向对象特性。现在VB7已经是一个完全的面向对象程序。
现在VB7已经支持类的各种特性：继承，函数的覆盖，重载，虚拟，隐藏??
3.功能强大，程序界面更标准。
4.程序代码结构化更强，开发环境舒适体贴。
修改VB代码的字体、大小、以及颜色可以参考下面的代码：
PrivateSubForm＿Load
Label1。字体＝＂常规＂；将字体改为常规字体
Label1。字形大小＝50”字形大小
改变字体颜色DAO为红色为前楼＝vbRed＇
Label1。标签自动改变大小与文本内容
EndSub
扩展资料：
vb参考函数
Do．．．Loop语句：当条件为True或者当条件变为True时，重复一语句块。
Empty：表示未初始化的变量的值。
Eqv运算符： 使两个表达式相等。
Erase语句：重新初始化固定数组的元素，并为动态数组重新分配存储空间。
Err对象：包含有关运行时错误的信息。
VB.NET中某些控件的字体属性是只读的，所以只可以使用NEW方法
（例子： Label1.Font = New Font("宋体", 9)）
如果是VB6.0中可以直接使用Lable1.Font.Size=Lable1.Font.Size + 3
(这里使用的例子是Lable控件，如果你使用的是Command控件直接改一下就好)
