winform中label怎么用

winform中label怎么用,第1张

Text属性:用来设置或返回标签控件中显示的文本信息。我们可以在属性面板的Text选项后面的文本框中输入文本信息,也可以用代码LabelText=""方式来定义文本信息。
AutoSize 属性:用来获取或设置一个值,该值指示是否自动调整控件的大小以完整显示其内容。取值为 true时,控件将自动调整到刚好能容纳文本时的大小,取值为false时,控件的大小为设计时的大小。默认值为false。
Anchor 属性:用来确定此控件与其容器控件的固定关系的。所谓容器控件指的是这样一种情况:往往在控件之中还有一个控件,例如最典型的就是窗体控件中会包含很多的控件,像标签控件、文本框等。
这时称包含控件的控件为容器控件或父控件,而父控件称为子控件。这时将遇到一个问题,即子控件与父控件的位置关系问题,即当父控件的位置、大小变化时,子控件按照什么样的原则改变其位置、大小。Anchor属性就规定了这个原则。 对于 Anchor 属性,可以设定 Top、Bottom、Right、Left 中的任意几种,设置的方法是在属性窗口中单击Anchor属性右边的箭头,将会出现如图 9-6 的窗口,通过它可设置 Anchor 属性值。图 9-6 中选中变黑的方位即为设定的方位控制,即图中所示的为 Left、Right、Bottom。此时,如果父窗口变化,子窗口将保证其左边缘与容器左边的距离、上边缘与容器上边的距离、底边与容器底边的距离等不变,效果如图9-7 所示。 可见随着窗体的大小变化, Label控件也会随着变 。 而 不 变 的 则 是Archor中所规定的边 缘与相应的父控件边缘的距离。
4
BackColor属性:用来获取或设置控件的背景色。当该属性值设置为 ColorTransparent 时,标签将透明显示,即背景色不再显示出来。

label
是定义goto的目标的
用在是否重来一次
重试命令
猜数游戏
label
var
a,b,c,d,e,f,x:integer;
s:string;
label
1;
begin
1:randomize;
b:=1;
writeln('猜数游戏:有若干次机会猜,每次会提示大了还是小了,请选择难度?(高1、中2、低3)');
readln(x);
if
x=1
then
begin
e:=125;f:=6;end
else
if
x=2
then
begin
e:=50;f:=5;end
else
if
x=3
then
begin
e:=20;f:=4;end
else
begin
writeln('你输入错了,难度默认为中');e:=50;f:=5;end;
writeln('猜数范围:1~',e);
a:=1+random(e);
for
c:=1
to
f
do
begin
writeln('你还有',f+1-c,'次机会');
writeln('请输入你猜的数:');
readln(d);
if
d>a
then
writeln('大了');
if
d
评论
0
0
加载更多

这个属性只有IE7+才支持,其他浏览器(Chrome、FireFox、safari等等)都是无效的
它用来显示选项的“更短版本”,比如下面
<option label="中国">中华人民共和国</option>
正常情况下是显示“中华人民共和国”的,但如果加了label="中国",就会显示为“中国”

'做着玩的小例子,仅供参考
'窗体上放两个Label,一个CommandButton
Private Sub Command1_Click()
Command1Enabled = False
MeCaption = Chr(&HD5FD) & Chr(&HD4DA) & _
Chr(&HB8F1) & Chr(&HCABD) & Chr(&HBBAF) & _
Chr(&H43) & Chr(&HC5CC) & Chr(&HA1AD)
Label1Visible = True
Timer1Interval = 50
End Sub
Private Sub Form_Load()
With Label2
BorderStyle = 1
Width = 3150
Move (MeScaleWidth - Width) \ 2, (MeScaleHeight - Height) \ 2
Caption = ""
End With
With Label1
Caption = ""
AutoSize = True
AutoSize = False
BackColor = vbBlue
ForeColor = vbWhite
Alignment = 1
Move Label2Left + 30, Label2Top + 30
Label2Height = Height + 60
ZOrder (0)
Visible = False
End With
End Sub
Private Sub Timer1_Timer()
Static p As Long
p = p + 1
With Label1
Caption = p & "%"
Width = Width + 30
If p < 100 Then Exit Sub
Timer1Interval = 0
p = 0
MsgBox "完成"
MeCaption = "完成"
Caption = ""
AutoSize = True
AutoSize = False
Move Label2Left + 30, Label2Top + 30
Visible = False
End With
Command1Enabled = True
End Sub
本来想用PictureBox做Label的容器,又一想,都用PictureBox了,谁还用Label做进度条?哈,反正楼主只要用Label做的进度条,就索性都用Label吧


欢迎分享,转载请注明来源:内存溢出

原文地址: https://outofmemory.cn/yw/13329379.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-07-16
下一篇 2023-07-16

发表评论

登录后才能评论

评论列表(0条)

保存