vb文本框怎么改粗體？

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 當然上邊三個函數可以合成一個函數，因為他們方法是一樣的，只是風格參數不同而已。