dim a as string = replace(trim(textbox1.text),"TMD","") 'a 是過(guò)濾后的字符串,沒(méi)有"TMD",

創(chuàng)新互聯(lián)是一家專(zhuān)業(yè)提供中江企業(yè)網(wǎng)站建設(shè),專(zhuān)注與成都網(wǎng)站設(shè)計(jì)、網(wǎng)站制作、外貿(mào)營(yíng)銷(xiāo)網(wǎng)站建設(shè)、H5建站、小程序制作等業(yè)務(wù)。10年已為中江眾多企業(yè)、政府機(jī)構(gòu)等服務(wù)。創(chuàng)新互聯(lián)專(zhuān)業(yè)網(wǎng)站建設(shè)公司優(yōu)惠進(jìn)行中。
還有:if textbox1.text.indexOf("TMD") -1 then exit sub
就這個(gè)之類(lèi)的
Private Sub Command1_Click()
Dim a$, b$
Open "c:\1.txt" For Input As #1 '假設(shè)你的文本文件叫1.txt,在C盤(pán)
Do While Not EOF(1)
Line Input #1, a
b = b a
Loop
Close #1
Print b '得到的數(shù)放在變量b里面,沒(méi)有換行的.只有數(shù)字. 不知道你是這個(gè)意思吧
End Sub
這個(gè)恐怕有點(diǎn)難度,比如用戶輸入text.txt,你可能認(rèn)為text.txt不允許輸,但是說(shuō)不定用戶有文件名字命名為text.txt.exe的可執(zhí)行文件存在,所以要過(guò)濾擴(kuò)展名靠判斷.號(hào)意義不大
新聞名稱:關(guān)于vb.net過(guò)濾txt的信息
瀏覽地址:http://www.chinadenli.net/article38/dddgpsp.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供域名注冊(cè)、商城網(wǎng)站、云服務(wù)器、外貿(mào)建站、網(wǎng)頁(yè)設(shè)計(jì)公司、網(wǎng)站排名
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來(lái)源: 創(chuàng)新互聯(lián)
猜你還喜歡下面的內(nèi)容