public const wm_user = &h400
public const em_settargetdevice = (wm_user + 72)
public declare function getdc lib "user32" (byval hwnd as long) as long
public declare function sendmessage lib "user32" alias "sendmessagea" _
(byval hwnd as long, _
byval wmsg as long, _
byval wparam as long, _
lparam as any) as long
public sub autoswitchline(byref richtext as richtextbox, byval bswitch as boolean)
if bswitch then
'設定 richtextbox 自動換行
call sendmessage(richtext.hwnd, em_settargetdevice, _
getdc(richtext.hwnd), richtext.width / 15)
if richtext.rightmargin = 0 then
richtext.rightmargin = 1
else
richtext.rightmargin = 0
end if
else
'設定 richtextbox 不自動換行
call sendmessage(richtext.hwnd, em_settargetdevice, 0, 1)
end if
end sub
呼叫方法：
autoswitchline richtextbox1, false
上面的**使richtextbox1不自動換行。
上面的是比較正規的方法，如果簡單的話，下面兩句**就可以了：
richtextbox1.multiline=true
richtextbox1.rightmargin=10000
RichTextBox中設定和取消自動換行
public const wm user h400 public const em settargetdevice wm user 72 public declare function getdc lib user32 byval hwnd as long as long public declar...
WPF中RichTextBox設定文字的樣式
richtextbox的內容操作方式，選中richtextbox的內容方法 textrange range richtextbox1.selection 獲取選中項 string text range.text 選中的文字內容 range.start 獲取選中的開始位置 range.end 獲取選中...
設定RichTextBox的Tab鍵顯示的寬度
設定richtextbox的tab鍵顯示的寬度 windows form中的richtextbox控制元件可以用於顯示rtf格式的文件，許多應用程式用它來提供簡單的文字編輯功能。然而，richtextbox有一個麻煩的地方，那就是它的tab鍵預設佔8個字元寬，有沒有辦法調整？google了半天，有的...
設定RichTextbox行間距 轉）
richtextbox雖然內建的功能已經很強大了，但是還是有些功能沒有提供，就比如 行間距 不知道其內建的功能是否可以實現，這裡在網上找到一個使用win32來設定的 public const intwm user 0x0400 2 public const intem getparaformat w...
設定RichTextBox的Tab鍵顯示的寬度
設定richtextbox的tab鍵顯示的寬度 windows form中的richtextbox控制元件可以用於顯示rtf格式的文件，許多應用程式用它來提供簡單的文字編輯功能。然而，richtextbox有一個麻煩的地方，那就是它的tab鍵預設佔8個字元寬，有沒有辦法調整？google了半天，有的...