在VB中，设置text文字粗体的方法是使用Font属性。首先选择要设置粗体的文本框或标签，然后在属性窗口中找到Font属性。
在Font属性中，找到Bold属性，将其设置为True即可使文字变为粗体。
此外，还可以通过代码来设置文字粗体，例如：TextBox1.Font = New Font("Arial", 12, FontStyle.Bold)。
这行代码将Arial字体、12号大小、粗体样式应用于TextBox1中的文字。总之，在VB中设置文字粗体非常简单，只需要在Font属性中设置Bold为True或使用代码来实现即可。
VBText控件中使字体加粗和倾斜的代码是： 加粗 Label1.FontBold = True 斜体 Label1.FontItalic = true 拓展资料： TextBox控件：
a. 控制Textbox输入格式，我想大多人都遇到这个问题，在TextBox作为输入接口时，有时我们希望用户只能输入数字、大写、字母等，一般的做法是对用户输入的字符这个检查。但是如果我们使用API，将很容易实现这些功能，比如：
1、只允许输入数字：
Const ES_NUMBER = &H2000 Public Function NumbersOnly(tBox As TextBox) Dim DefaultStyle As Long DefaultStyle = GetWindowLong(tBox.hwnd, GWL_STYLE) NumbersOnly = SetWindowLong(tBox.hwnd, GWL_STYLE, DefaultStyle Or ES_NUMBER) End Function 2、只允许大写：
Public Function UpperCaseOnly(tBox As TextBox) Dim DefaultStyle As Long DefaultStyle = GetWindowLong(tBox.hwnd, GWL_STYLE) UpperCaseOnly = SetWindowLong(tBox.hwnd, GWL_STYLE, DefaultStyle Or ES_UPPERCASE) End Function 3、只允许小写：
Public Function LowerCaseOnly(tBox As TextBox) Dim DefaultStyle As Long DefaultStyle = GetWindowLong(tBox.hwnd, GWL_STYLE) LowerCaseOnly = SetWindowLong(tBox.hwnd, GWL_STYLE, DefaultStyle Or ES_LOWERCASE) End Function 当然上边三个函数可以合成一个函数，因为他们方法是一样的，只是风格参数不同而已。
