在vb中如何将标签控件中的字体改为垂直居中

 我来答
zdingyun
推荐于2016-11-29 · 知道合伙人软件行家
zdingyun
知道合伙人软件行家
采纳数:15429 获赞数:48173
1982年上海业余工业大学化工系毕业 现退休

向TA提问 私信TA
展开全部

在VB中可

  • 设置Label控件的Alignment为2

  • 调整字号大小到显示单个字,或者收小Label控件的宽度(Width)


  • 代码方法(不推荐,只能用于一个标签):
Private Function Vertical_Horizontal(ByVal nStr As String) As String
    Dim MyStr As String, i As Integer
    Static Vert As Boolean
    For i = 1 To Len(nStr)
        If i < Len(nStr) Then
            MyStr = MyStr + Mid$(nStr, i, 1) & vbCrLf
        Else
            MyStr = MyStr + Mid$(nStr, i, 1)
        End If
    Next
    Vertical_Horizontal = MyStr
    Vert = True
End Function
Private Sub Form_Load()
    Label1.AutoSize = True
    Label1.Caption = "VB如何让标签里的文字竖排"
    Label1.Caption = Vertical_Horizontal(Label1.Caption)
End Sub
  •  使用标签控件的WordWrap属性设置True,调整字号大小以适应控件宽度。

    设置Label控件的Alignment为2。

    WordWrap 属性,返回或设置一个值,该值用来指示一个 AutoSize 属性设置为 True 的 Label
    控件,是否要进行水平或垂直展开以适合其 Caption 属性中指定的文本的要求。

duyin2011
2011-05-18 · TA获得超过2398个赞
知道大有可为答主
回答量:1723
采纳率:100%
帮助的人:658万
展开全部

在工程菜单下,部件加载Microsoft forms 2.0 object  library  选择它面的标签控件,将其下属性wordwrap设置成true ,就可以了,如图

本回答被网友采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式