如何在Visual Basic（使用Visual Studio 2010）中为文本添加下划线

Question

5

我在使用Visual Basic时遇到了一个下划线文本的问题。我正在使用Visual Studio 2010，并在教程中看到，在按钮方法中，我需要使用例如：

lbltext.FontUnderline = True

但是我没有"FontUnderline"变量。当然，我试图找到其他变量或函数来完成这个任务，但是没有成功。有人知道在Visual Studio中如何实现这个功能吗？

- caro

4个回答

3

以前的做法是实例化一个新的字体

Font standardFont = new Font(lblText.Font)
Font underFont = new Font(standardFont,FontStyle.Underline)

那么只需将相关控件的字体属性设置为所需字体即可。

- Tony Hopkinson

3

借鉴了@Tony Hopkinson的例子，并进行了一些小改动，使其适用于VB.NET。

因此，这是VB.NET的语法。

Dim standardFont As Font = lblExportDate.Font
Dim underFont As New Font(standardFont, FontStyle.Underline)

Me.lblExportDate.Font = underFont

- Matthis Kohli

2

我认为你漏掉了一个点。

应该是 lbltext.Font.Underline = true

- Nitram

1

但是这种方式变量Underline是只读的，所以我无法更改它。 - caro

网页内容由stack overflow 提供, 点击上面的

可以查看英文原文，
原文链接

- wpcoder · Accepted Answer

一个行内回答是这样的：

Me.lbltext.Font =  New Font(lbltext.Font, FontStyle.Underline)

这可以节省多行代码。