vb.net粗體 vb粗體斜體代碼

VB.NET,Richtextbox的bold設(shè)置

斜粗體是用 Or 合并；

站在用戶的角度思考問題，與客戶深入溝通，找到賈汪網(wǎng)站設(shè)計與賈汪網(wǎng)站推廣的解決方案，憑借多年的經(jīng)驗，讓設(shè)計與互聯(lián)網(wǎng)技術(shù)結(jié)合，創(chuàng)造個性化、用戶體驗好的作品，建站類型包括：成都網(wǎng)站建設(shè)、網(wǎng)站建設(shè)、企業(yè)官網(wǎng)、英文網(wǎng)站、手機端網(wǎng)站、網(wǎng)站推廣、域名注冊、網(wǎng)絡(luò)空間、企業(yè)郵箱。業(yè)務(wù)覆蓋賈汪地區(qū)。

Ft?=?New?Font("宋體",?9.0!,?CType((FontStyle.Bold?Or?FontStyle.Italic),?FontStyle))

也可以在設(shè)定粗體前先保存原有字體，可以方便還原；

Private?OldFont?As?Font?'舊的字體

OldFont?=?RichTextBox1.SelectionFont?'保存當前字體?

RichTextBox1.SelectionFont?=?New?Font("宋體",?9.0!,?FontStyle.Bold)?'9號加粗宋體

換回原來的字體；

RichTextBox1.SelectionFont?=?OldFont?'設(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

vb.net字體的粗體斜體同時顯示怎么設(shè)置

該參數(shù)枚舉值，采用位運算，那么可以用Or把兩者連接起來即可；

New Font(CurrentFont.FontFamily, CurrentFont.Size, FontStyle.Bold Or FontStyle.Italic)

VB.net中代碼如何寫，當選中文本為粗體時單擊按鈕變成正常的，反之變?yōu)榇煮w，其它不要變？

vb.net 沒用過，不過估計richtextbox控件應(yīng)該有selbold這個屬性

If RT1.SelBold = False Then

RT1.SelBold = True

Else

RT1.SelBold = False

End If

這樣就行。如果沒有這個屬性就不會了

文章標題：vb.net粗體 vb粗體斜體代碼
新聞來源：http://muchs.cn/article14/dospoge.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供網(wǎng)站設(shè)計、網(wǎng)站維護、網(wǎng)站排名、品牌網(wǎng)站制作、營銷型網(wǎng)站建設(shè)、外貿(mào)建站

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時需注明來源： 創(chuàng)新互聯(lián)