今天宠物迷的小编给各位宠物饲养爱好者分享vb设置label的大小的宠物知识,其中也会对在vb中(在vb中具有click事件的控件)进行专业的解释,如果能碰巧解决你现在面临的宠物相关问题,别忘了关注本站哦,现在我们开始吧!
label1.font="宋体"
label1.fontsize=20
label1.forecolor=vbred
自己调节相应的值就可以了
那个颜色调节也可以这样
label1.forecolor=rgb(红色比例,绿色比例,蓝色比例)
三个比例数值在0-255间取值
1、打开VB软件,在窗体上添加一个标签,如下图所示。 2、点击标签,在属性窗口设置标签的属性和名称,将其Caption设置为“快乐学习”(这里以“快乐学习”四个字为例)。 3、将Autosize设置为True,如下图所示。 4、再在窗体上面,添加一个列表框控件,如下图所示。 5、点击列表框,在属性窗口设置列表框控件的属性和名称,如下图所示。 6、双击列表框,开始运行代码,如下图所示。 7、在运行的表框中点击不同的数值(例如这里点击的是16),即可看到vb中label标签文字的大小的变化,如下图所示。
label有个setFont()方法,可以设置字体,用法如下:
Label lb2=new Label(shell,SWT.CENTER);
lb2.setText("测试字体");
lb2.setFont(new Font(display,"宋体",16,SWT.NORMAL));//设置文字的字体字号
在运行状态下,设置控件的 Font中的Name 及Size 属性就可以设置其字体名称及大小.
如:
Command1.Font.Name="宋体"
Command1.Font.Size="30"
Label.Font.Name = "楷体_GB2312"
Label1.Font.Size = "30"
label1.autosize=true
也可以在属性窗口中将autosize设置为true
将label的autoresize属性设为true
使用for each 遍历窗体所有控件,如果是label 或 text 控件则改变其字体,或颜色。以下代码vs2008下通过测试。e.g.'---------------------------------------------------'窗体:Form1'2个label : label1,label2'2个Textbox: textbox1,textbox2'1个button : button1'-----------------------------------------------------------Public Class Form1'按钮单击时间 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim ob As Control
Dim obtype As String
For Each ob In Me.Controls
obtype = ob.GetType().ToString()
If obtype = "System.Windows.Forms.TextBox" Or obtype = "System.Windows.Forms.Label" Then
ob.ForeColor = Color.Blue ‘字体颜色
ob.Font = New System.Drawing.Font("宋体", 20.5F, FontStyle.Underline) ’字体
End If
Next
End Sub
End Class
上一篇
苹果手机壳防摔排名测评?
下一篇
水中为什么会产生气泡?