中国建设银行招聘信息网站,洛阳网站建设好做不,企业培训课程一览表,手机网站地址展开全部VBText控件中使字体加粗和倾e69da5e6ba9062616964757a686964616f31333365656537斜的代码是#xff1a;加粗 Label1.FontBold True斜体 Label1.FontItalic true拓展资料#xff1a;TextBox控件#xff1a;a. 控制Textbox输入格式#xff0c;我想大多人都遇到这个…展开全部VBText控件中使字体加粗和倾e69da5e6ba9062616964757a686964616f31333365656537斜的代码是加粗 Label1.FontBold True斜体 Label1.FontItalic true拓展资料TextBox控件a. 控制Textbox输入格式我想大多人都遇到这个问题在TextBox作为输入接口时有时我们希望用户只能输入数字、大写、字母等一般的做法是对用户输入的字符这个检查。但是如果我们使用API将很容易实现这些功能比如1、只允许输入数字Const ES_NUMBER H2000Public Function NumbersOnly(tBox As TextBox)Dim DefaultStyle As LongDefaultStyle GetWindowLong(tBox.hwnd, GWL_STYLE)NumbersOnly SetWindowLong(tBox.hwnd, GWL_STYLE, DefaultStyle Or ES_NUMBER)End Function2、只允许大写Public Function UpperCaseOnly(tBox As TextBox)Dim DefaultStyle As LongDefaultStyle GetWindowLong(tBox.hwnd, GWL_STYLE)UpperCaseOnly SetWindowLong(tBox.hwnd, GWL_STYLE, DefaultStyle Or ES_UPPERCASE)End Function3、只允许小写Public Function LowerCaseOnly(tBox As TextBox)Dim DefaultStyle As LongDefaultStyle GetWindowLong(tBox.hwnd, GWL_STYLE)LowerCaseOnly SetWindowLong(tBox.hwnd, GWL_STYLE, DefaultStyle Or ES_LOWERCASE)End Function当然上边三个函数可以合成一个函数因为他们方法是一样的只是风格参数不同而已。
