VB.NET文本框中的文本格式進(jìn)行相應(yīng)的設(shè)置

太晚了，想不出什么好方法了。

成都創(chuàng)新互聯(lián)是一家專(zhuān)業(yè)提供鳳陽(yáng)企業(yè)網(wǎng)站建設(shè),專(zhuān)注與網(wǎng)站設(shè)計(jì)制作、成都網(wǎng)站建設(shè)、H5建站、小程序制作等業(yè)務(wù)。10年已為鳳陽(yáng)眾多企業(yè)、政府機(jī)構(gòu)等服務(wù)。創(chuàng)新互聯(lián)專(zhuān)業(yè)網(wǎng)站制作公司優(yōu)惠進(jìn)行中。

發(fā)上來(lái)看看吧。

首先建立一個(gè)TextBox,我這里名字為T(mén)extBox2

然后放一個(gè)groupbox，在里頭放兩個(gè)Checkbox,checkbox1為粗體，checkbox2為斜體。

代碼：

Dim Bold As Boolean

Dim Italic As Boolean

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

If CheckBox1.Checked Then

Bold = True

If Italic Then

TextBox2.Font = New Font(TextBox2.Font, FontStyle.Bold Or FontStyle.Italic)

Else

TextBox2.Font = New Font(TextBox2.Font, FontStyle.Bold)

End If

Else

Bold = False

If Italic Then

TextBox2.Font = New Font(TextBox2.Font, FontStyle.Italic)

Else

TextBox2.Font = New Font(TextBox2.Font, 0)

End If

End If

End Sub

Private Sub CheckBox2_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox2.CheckedChanged

If CheckBox2.Checked Then

Italic = True

If Bold Then

TextBox2.Font = New Font(TextBox2.Font, FontStyle.Italic Or FontStyle.Bold)

Else

TextBox2.Font = New Font(TextBox2.Font, FontStyle.Italic)

End If

Else

Italic = False

If Bold Then

TextBox2.Font = New Font(TextBox2.Font, FontStyle.Bold)

Else

TextBox2.Font = New Font(TextBox2.Font, 0)

End If

End If

End Sub

可以等等別人回答，看看有沒(méi)有更好的方法。

vb.net 登陸框中設(shè)置輸入格式

我這兒沒(méi)有.net，簡(jiǎn)單說(shuō)下。響應(yīng)Textbox的按鍵事件，事件中有一個(gè)參數(shù) e ，e這個(gè)對(duì)象有幾個(gè)成員，其中有一個(gè)是是否將按鍵傳遞到控件，有一個(gè)是按鍵碼，你可以判斷按鍵碼是否合法從而確定是否將按鍵傳遞到Textbox去。

vb.net 字體設(shè)置

給點(diǎn)提示吧，已粗體為例（完全是我自己的方法，不知?jiǎng)e人是怎么做的）：

'先獲取選擇的字體信息（字體、大小、樣式。。。）

Dim currentFont As System.Drawing.Font = RichTextBox1.SelectionFont

'在重新定義某種樣式的時(shí)候，不丟失其他信息

RichTextBox1.SelectionFont = New Font(currentFont.FontFamily, currentFont.Size, FontStyle.Bold)

vb.net中，如何用代碼設(shè)置字體及字號(hào)？不要彈對(duì)話(huà)框的那種

Me.RichTextBox1.SelectionFont = New Font("宋體", 14.25!, FontStyle.Bold Or FontStyle.Italic)

vb.net如何設(shè)置FORM的text字體

您好。修改FORM的Font屬性就可以修改窗體和其中所有控件的字體。

Me.Font?=?New?System.Drawing.Font("宋體",?10)

另外，F(xiàn)ORM標(biāo)題欄的TEXT字體和顏色是操作系統(tǒng)決定的，要想改變，只能調(diào)用系統(tǒng)的api函數(shù)，截獲操作系統(tǒng)的消息來(lái)改變。

下面的網(wǎng)址有C#版本的重繪標(biāo)題欄范例

軟糖的回答滿(mǎn)意嗎，請(qǐng)及時(shí)采納，謝謝。