📄 18854.html

📁 VB技巧问答10000例 VB技巧问答10000例

💻 HTML

字号:

<html>  <head>    <title>Re: 有谁会在LABEL固定大小条件上依文字多寡而改变文字大小...</title>  </head>  <body bgcolor="#FFFFFF" vlink="#808080">    <center>      <h1>Re: 有谁会在LABEL固定大小条件上依文字多寡而改变文字大小...</h1>    </center><hr size=7 width=75%><hr size=7 width=75%><p>Posted by <a href="mailto:wang18@kimo.com.tw">蜈蚣</a> on September 13, 1999 at 03:37:45:<p>In Reply to: <a href="18852.html">有谁会在LABEL固定大小条件上依文字多寡而改变文字大小...</a> posted by ADAN on September 13, 1999 at 01:21:29:<p>: 有谁会在LABEL固定大小条件上依文字多寡而改变文字大小...<br>: 即label宽度不变,caption内文字超过宽度时,就自动缩小fontsize<br>偶是菜鸟, 若有误请不要K我......<br>这问题我有想到过<br>如果控制项label1是固定, 就开一个label2将<br>With Label2<br>    .Visible=False<br>    .AutoSie=True<br>    .Caption=[Variable Value]<br>       :<br>       :<br>End With<br>If Label2.Width > [Variable Value] then _<br>   Label2.FontSize=[Variable Value]<br>With Label1<br>    .Caption=Label2.Caption<br>    .Fontize = Label2.FontSize<br>       :<br>       :<br>End With<br>偶是用这样子判断啦, 不然就粉麻烦(因为我不太懂API :~)<br><br><hr size=7 width=75%><p><a name="followups">Follow Ups:</a><br><ul><!--insert: 18854--><!--top: 19373--><li><a href="19373.html">Re: 有谁会在LABEL固定大小条件上依文字多寡而改变文字大小...</a> <b>我也是菜鸟</b> <i>09:36:30 9/28/99</i>(<!--responses: 19373-->0)<ul><!--insert: 19373--></ul><!--end: 19373--></ul><!--end: 18854--><br><hr size=7 width=75%><p></body></html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -