1、打开VB软件,在窗体上添加一个标签,如下图所示。
2、点击标签,在属性窗口设置标签的属性和名称,将其Caption设置为“快乐学习”(这里以“快乐学习”四个字为例)。
3、将Autosize设置为True,如下图所示。
4、再在窗体上面,添加一个列表框控件,如下图所示。
5、点击列表框,在属性窗口设置列表框控件的属性和名称,如下图所示。
6、双击列表框,开始运行代码,如下图所示。
7、在运行的表框中点击不同的数值(例如这里点击的是16),即可看到vb中label标签文字的大小的变化,如下图所示。
更改vb中label标签文字的字体、大小、以及颜色可以参考下面的代码:
PrivateSubForm_Load()
Label1.Font="楷体"'字体改为楷体
Label1.FontSize=50'字体大小
Label1.ForeColor=vbRed'字体颜色改为红色
Label1.AutoSize=True'label随文字内容自动改变大小
EndSub
扩展资料:
vb参考函数
Do...Loop 语句: 当条件为 True 或者当条件变为 True 时,重复一语句块。
Empty: 表示尚未初始化的变量值。
Eqv运算符: 使两个表达式相等。
Erase 语句: 重新初始化固定数组的元素并重新分配动态数组的存储空间。
Err 对象: 含有关于运行时错误的信息。
Eval 函数: 计算并返回表达式的值。
参考资料来源:百度百科-Visual Basic
Execute 语句: 执行单个或更多的指定语句。
可以使用两种方法实现:
一是在窗体中选中标签对象后,在属性窗口中选中它的“Font“属性,在其右侧点击有省略号的小按钮,在其中的”大小“框中选择合适的大小。
二是可以在窗体的Load事件中设置:
Private Sub Form_Load()
Label1.FontSize = 20 '其中具体的数字大小可以自行尝试,合适为止
End Sub
Label1.Font.Size = ...
Label1.Font = New Font("字体名称", 大小, FontStyle.字形 )