主题：控件样式代码控制

If e.Sender.Name = "客户总数" Then 

    Dim s As String = "123" 

    Dim s1 As String = "789" 

    e.Sender.Text = s & Chr(10) & s1

    e.Sender.Font = New Font("黑体", 24, FontStyle.Bold Or FontStyle.Underline)

End If