真实的国产乱ⅩXXX66竹夫人,五月香六月婷婷激情综合,亚洲日本VA一区二区三区,亚洲精品一区二区三区麻豆

成都創(chuàng)新互聯(lián)網(wǎng)站制作重慶分公司

vb.net_字體加粗 vb字體加粗后取消加粗

VB.NET,如何用代碼實現(xiàn)改變字體、顏色、加粗,以及恢復(fù)默認(rèn)?

1、2和3:你怎么改的,就怎么恢復(fù)默認(rèn)

成都創(chuàng)新互聯(lián)是一家專注于網(wǎng)站建設(shè)、成都網(wǎng)站設(shè)計與策劃設(shè)計,柳江網(wǎng)站建設(shè)哪家好?成都創(chuàng)新互聯(lián)做網(wǎng)站,專注于網(wǎng)站建設(shè)十年,網(wǎng)設(shè)計領(lǐng)域的專業(yè)建站公司;建站業(yè)務(wù)涵蓋:柳江等地區(qū)。柳江做網(wǎng)站價格咨詢:028-86922220

3:textbox1.font=new

font(

字體

名稱,字體大小,

字形

),字形有加粗常規(guī)傾斜

下劃線

等幾種。

VB.NET,如何用代碼實現(xiàn)改變字體、顏色、加粗,以及恢復(fù)默認(rèn)?

1、2和3:你怎么改的,就怎么恢復(fù)默認(rèn)

3:textbox1.font=new font(字體名稱,字體大小,字形),字形有加粗常規(guī)傾斜下劃線等幾種。

VBText控件中使字體加粗和傾斜的代碼是什么

VBText控件中使字體加粗和傾斜的代碼是:

加粗 Label1.FontBold = True

斜體 Label1.FontItalic = true

拓展資料:

TextBox控件:

a.?? 控制Textbox輸入格式,我想大多人都遇到這個問題,在TextBox作為輸入接口時,有時我們希望用戶只能輸入數(shù)字、大寫、字母等,一般的做法是對用戶輸入的字符這個檢查。但是如果我們使用API,將很容易實現(xiàn)這些功能,比如:

1、只允許輸入數(shù)字:

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

當(dāng)然上邊三個函數(shù)可以合成一個函數(shù),因為他們方法是一樣的,只是風(fēng)格參數(shù)不同而已。

vb.net中如何將文本字體加粗

Private Sub CheckBox1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox1.CheckedChanged Dim b As FontStyle

If CheckBox1.Checked Then b = FontStyle.Bold Else b = FontStyle.Regular End If TextBox1.Font = New Font(TextBox1.Font.Name, TextBox1.Font.Size, t) End Sub


當(dāng)前題目:vb.net_字體加粗 vb字體加粗后取消加粗
鏈接URL:http://weahome.cn/article/doedoss.html

其他資訊

在線咨詢

微信咨詢

電話咨詢

028-86922220(工作日)

18980820575(7×24)

提交需求

返回頂部