VB 技巧 文字框使用技巧

2021-04-15 16:13:01 字數 1243 閱讀 9377

1、控制文字框中輸入的內容

例如我們只要求在文字框中輸入數字,而不允許出現其它字元,則我們使用keypress事件並檢查keyascii引數即可,keyascii引數用來儲存鍵盤所用的ansi碼(不是ascii碼),下面是乙個例子:

private sub text_keypress(keyascii as integer)

if keyascii < asc("0") or keyascii > asc("9") then

keyascii=0

end if

end sub

有時我們需要從外部的文字檔案中讀入到文字框中,或是把輸入到文字框中的內容儲存到檔案中,這時可以通過對檔案操作的幾個語句來實現,其中 open 語句能夠對檔案輸入/輸出,lof函式返回乙個 long型值,表示用 open 語句開啟的檔案的大小,該大小以位元組為單位。input函式從檔案中讀入資料,而print函式則把資料寫到檔案中。具體的**如下面的例項,需要注意的是文字框只能開啟大小在32k以下的文字檔案,否則會出現錯誤。

filename="c:/myext.txt"

open filename for input as #1

text.text=input$(lof(1),#1)

close #1

filename="c:/myext.txt"

on error resume next

open "c:/file.txt" for output as #1

print #1,text1.text

close #1

3、怎樣把文字框中的文字全部選中

這需要使用文字框的屬性selstart和sellength屬性,selstart表示選擇文字的開始,sellength表示要選中文字的長度,採用以下兩句**就行了。

text1.selstart = 0

text1.sellength = len(text1.text)

另外順便提一下seltext屬性,它可以得到已經選中的文字。

4、如何在已經存在的文字的textbox新增新的一行

dim strnewtext as string

text1.strnewtext = "updated: " & date

text1.selstart = len(text1.text)

text1.seltext = vbnewline & strnewtext

實現的關鍵是vbnewline常數,它的意義是插入乙個換行符。

jquery技巧 jquery獲取文字框字元數

jquery 可以用text 方法來取得字串,再用length 判斷長度,然後用substring 方法格式化截斷,趁我寫例子這點時間有兩個人回答了 呵呵 剛才試驗過了 看下例子吧 得到字串的真實長度 雙位元組換算為兩個單位元組 function getstractuallen schars 格式化...

vb取消文字框的貼上功能

以下 在窗體 程式 option explicit 石陸軟體屋 private sub form load g holdproc setwindowlong text1.hwnd,gwl wndproc,addressof wndproc end sub private sub form unloa...

Latex之使用文字框, 文字框如何自動斷頁

如果要實現latex文字框,可以使用tcolorbox包.使用時首先匯入 usepackage在使用時 begin colback black 3 white,colframe black 30 white text end即可.colback指背景的顏色,colframe指邊框的顏色.根據自己的需...