Câu lệnh:
Ví dụ:
Nhiều định dạng Format: (chỉ cần sửa cái cũ thêm thuộc tính mới)
Khai Báo Hàm SendMessage:
- Code:
RichTextBox1.SelectAll()
RichTextBox1.SelectionFont = New Font(RichTextBox1.Font.FontFamily, RichTextBox1.Font.Size, FontStyle.Bold)
Ví dụ:
- Code:
RichTextBox1.SelectionFont = New Font("Tahoma", 12, FontStyle.Bold)
RichTextBox1.SelectionColor = System.Drawing.Color.Red
Nhiều định dạng Format: (chỉ cần sửa cái cũ thêm thuộc tính mới)
- Code:
RichTextBox1.SelectAll()
RichTextBox1.SelectionFont = New Font(RichTextBox1.Font.FontFamily, 12, FontStyle.Bold)
Khai Báo Hàm SendMessage:
- Code:
Declare Function SendMessage Lib "USER32" Alias "SendMessageW" (ByVal hwnd As IntPtr, ByVal wMsg As Integer, ByVal wParam As Integer, ByVal lParam As String) As Integer
Const WM_SETTEXT As Integer = &HC
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
SendMessage(sendtexthandle, WM_SETTEXT, 0&, RichTextBox1.Rtf)
End Sub