有一個(gè)字符串函數(shù):Instr(n,S1,S2)

創(chuàng)新互聯(lián)公司是一家專業(yè)提供霞山企業(yè)網(wǎng)站建設(shè),專注與成都網(wǎng)站建設(shè)、成都做網(wǎng)站、成都h5網(wǎng)站建設(shè)、小程序制作等業(yè)務(wù)。10年已為霞山眾多企業(yè)、政府機(jī)構(gòu)等服務(wù)。創(chuàng)新互聯(lián)專業(yè)的建站公司優(yōu)惠進(jìn)行中。
該函數(shù)的功能:從字符串S1的左起第N位開始,向右逐位進(jìn)行搜索匹配字符串S2,如果找到匹配,就返回一個(gè)整數(shù)指明匹配的位置,否則就返回0。如果缺省n,就是默認(rèn)從字符串S1的左起第1位開始,進(jìn)行搜索匹配字符串S2。
例如1:Instr(1,"abcde","a"),返回1
例如2:Instr(3,"abcde","a"),返回0
例如3:Instr(1,"abcde","c"),返回3
例如4:Instr(1,"abcde","cde"),返回3
例如5:Instr(4,"ab12cd12e12","12"),返回7,這里從字符串"ab12cd12e12"左起第4位開始向右搜索匹配字符串"12",找到的是中間一個(gè)“12”,這個(gè)“12”是位于字符串"ab12cd12e12"左起的第7個(gè)字符。
而:Instr(1,"ab12cd12e12","12"),返回3
Instr("ab12cd12e12","12"),返回3
dim lc as long
lc=InStr(1, WebBrowser1.Document.body.innerhtml, "下載完畢!")
lc大于零的話說明包含,否則說明不包含。
dim st as string = "qwertyuiop"
msgbox(st.indexof("p"))
若為-1,則表示不存在
有啊,用正則表達(dá)式,下面是簡(jiǎn)單的例子
Imports?System.Text.RegularExpressions
Public?Class?Form1
Private?Sub?Button1_Click(ByVal?sender?As?System.Object,?ByVal?e?As?System.EventArgs)?Handles?Button1.Click
Dim?str?As?String?=?"ABCDAEAFAG"
Dim?Patter?As?String?=?"A"
Dim?Matches?As?MatchCollection?=?Regex.Matches(str,?Patter,?RegexOptions.IgnoreCase?Or?RegexOptions.ExplicitCapture)
For?Each?ws?In?Matches
ListBox1.Items.Add("索引位置:"??ws.index)
Next
End?Sub
End?Class
簡(jiǎn)單點(diǎn)寫。
Module Program
Sub Main()
Console.WriteLine("Hello World!")
Dim t As String, a() As String, c As Integer
t="/admin/index/login/defasd.php"
a=t.Split("/"c)
c=0
For Each p In a
If c0 Then
Console.WriteLine("/"+p)
End If
c+=1
Next
Console.Write("Press any key to continue . . . ")
Console.ReadKey(True)
End Sub
End Module
========
Hello World!
/admin
/index
/login
/defasd.php
很簡(jiǎn)單,用字符串查找函數(shù)就可以實(shí)現(xiàn)了。
當(dāng)在StrB查找到StrA字符串時(shí),返回肯定是非0的數(shù),值就是True,找不到為0或者-1,值就是Flase
比如:
Dim StrA As String = "Time is Limited"
Dim StrB As String = "Time"
Dim Stu As Boolean= InStr(StrA, StrB)
這運(yùn)行段代碼,Stu值就是True了。
我覺得這樣最簡(jiǎn)單有效。
網(wǎng)頁(yè)標(biāo)題:vb.net查詢字符串,vb在字符串中查找字符串
文章路徑:http://chinadenli.net/article19/dsiijdh.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供網(wǎng)站維護(hù)、網(wǎng)站收錄、響應(yīng)式網(wǎng)站、定制開發(fā)、標(biāo)簽優(yōu)化、
聲明:本網(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í)需注明來源: 創(chuàng)新互聯(lián)