//選中游標所在的行內容
//
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...