vb 操作textBox內的內容

2021-06-21 13:35:37 字數 1184 閱讀 8539

//選中游標所在的行內容

//

public function gettextboxoneline(tbbox as textbox) as string

on error goto er

dim stroneline as string, nummidposiont as long, n as long

dim topline as string, bottomline as string, a as string

'//取得行內容

nummidposiont = tbbox.selstart '游標所在位置

'if nummidposiont = 0 then exit function '游標為0退出

'//取得游標左邊內容

n = 1

do while instr(topline, vbcrlf) = 0

a = mid(left(tbbox.text, nummidposiont), nummidposiont - n + 1, 1) '取游標左邊的字,然後逐個擷取

topline = a & topline

'msgbox topline

n = n + 1

loop

topline = replace(topline, vbcrlf, "")

'//取得游標右邊內容

n = 1

do while instr(bottomline, vbcrlf) = 0

a = mid(right(tbbox.text, len(tbbox.text) - nummidposiont), n, 1) '取游標右邊的字,然後逐個擷取

bottomline = bottomline & a

'msgbox bottomline

n = n + 1

loop

bottomline = replace(bottomline, vbcrlf, "")

gettextboxoneline = topline & bottomline

exit function

er: 'msgbox "自動增一行空白行" err.description, , "提示"

tbbox.text = vbcrlf & tbbox.text & vbcrlf

end function

限制textbox中的內容

在應用系統的開發中,我們經常需要限制使用者的輸入,以高效無誤的開展工作,比如說,號碼,僅能位數字等。對於某乙個textbox控制項的keypress事件程式設計,可以找到keypress雙擊,具體 如下 private void textbox1 keypress object sender,key...

WPF 限制Textbox輸入的內容

限制文字框textbox的輸入內容,在很多場景都有應用。舉個例子,現在文字框中,只能輸入0 1 2 3 4 5 6 7 8 9 這11個字元。限制輸入0 9很容易實現,關鍵是這個 符號。它在wpf中對應的是key.oempipe鍵。如果直接允許該鍵輸入,那麼會有 這個符號也可以輸入。那麼問題來了,怎...

C 限制TextBox控制項內輸入值的範圍

舉個例子,比如要限制textbox1控制項內只能輸入1 100的數字 先將textbox1的maxlength屬性設定成3 1.首先要限制輸入的只能是數值,不能是字母或其他符號 選擇新增textbox1的keypress事件,如下 private void textbox1 keypress obj...