VB.Net如何利用“文本中是否包含某字符串”作為判斷條件應(yīng)該用什么函數(shù)？

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

創(chuàng)新互聯(lián)建站是一家集網(wǎng)站建設(shè),平定企業(yè)網(wǎng)站建設(shè),平定品牌網(wǎng)站建設(shè),網(wǎng)站定制,平定網(wǎng)站建設(shè)報價,網(wǎng)絡(luò)營銷,網(wǎng)絡(luò)優(yōu)化,平定網(wǎng)站推廣為一體的創(chuàng)新建站企業(yè)，幫助傳統(tǒng)企業(yè)提升企業(yè)形象加強(qiáng)企業(yè)競爭力?？沙浞譂M足這一群體相比中小企業(yè)更為豐富、高端、多元的互聯(lián)網(wǎng)需求。同時我們時刻保持專業(yè)、時尚、前沿，時刻以成就客戶成長自我，堅(jiān)持不斷學(xué)習(xí)、思考、沉淀、凈化自己，讓我們?yōu)楦嗟钠髽I(yè)打造出實(shí)用型網(wǎng)站。

該函數(shù)的功能：從字符串S1的左起第N位開始，向右逐位進(jìn)行搜索匹配字符串S2，如果找到匹配，就返回一個整數(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"，找到的是中間一個“12”，這個“12”是位于字符串"ab12cd12e12"左起的第7個字符。

而：Instr(1,"ab12cd12e12","12")，返回3

Instr("ab12cd12e12","12")，返回3

vb.net 查找字符串

簡單點(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

vb.net 中的字符串搜索、查找功能在哪里

有啊，用正則表達(dá)式，下面是簡單的例子

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