主题：如何设定标签控件 显示的字符宽度等于当前窗体宽度？不管字体内容多少 都全部铺满显示 自动扩展字符间距

    Dim lbl As WinForm.Label = e.Form.Controls("Label1")
    lbl.text=vars("会议主题")
    If e.Form.Width > lbl.Width OrElse e.Form.Height > lbl.Height Then
        lbl.Left = (e.Form.Width - lbl.Width ) / 2
        'lbl.Top = (e.Form.Height - lbl.Height ) / 2
    End If

上述代码可以实现文本显示的内容  在当前窗体中居中显示

怎么实现文本显示的内容 在当前窗体中铺满显示呢？不管字体内容多少  都全部铺满显示  自动扩展字符间距