Foxtable(狐表)用户栏目专家坐堂 → 设置标签文本对齐方式


  共有1344人关注过本帖树形打印复制链接

主题:设置标签文本对齐方式

帅哥,在线噢!
cd_tdh
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐精 帖子:3209 积分:21331 威望:0 精华:0 注册:2016/3/28 16:57:00
设置标签文本对齐方式  发帖心情 Post By:2024/8/14 14:32:00 [只看该作者]

Dim frm As WinForm.Form = e.Form
For Each c As WinForm.Control In frm.Controls
    If TypeOf c Is WinForm.Label Then '判断控件是否是按钮  
        c.TextAlign = ContentAlignment.MiddleRight
    End If
Next
老师,黄色代码设置标签文本对齐方式怎么报错呢?
[此贴子已经被作者于2024/8/14 14:44:20编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110771 积分:563787 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/8/14 15:00:00 [只看该作者]

    If TypeOf c Is WinForm.Label Then '判断控件是否是按钮  
        Dim la As WinForm.Label = c
        la.TextAlign = ContentAlignment.MiddleRight
    End If

 回到顶部
帅哥,在线噢!
cd_tdh
  3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐精 帖子:3209 积分:21331 威望:0 精华:0 注册:2016/3/28 16:57:00
  发帖心情 Post By:2024/8/15 9:20:00 [只看该作者]

哎,帮助里面都没注意
Dim lbl As WinForm.Label = e.Form.Controls("Label1")
lbl
.BorderStyle = BorderStyle.FixedSingle
lbl
.TextAlign = ContentAlignment.MiddleCenter
lbl
.BorderColor = Color.Red

 回到顶部