vb.net搜索字符串,vbs字符串

VB.Net如何利用“文本中是否包含某字符串”作为判断条件应该用什么函数？

有一个字符串函数：Instr(n,S1,S2)

创新互联建站是一家集网站建设,平定企业网站建设,平定品牌网站建设,网站定制,平定网站建设报价,网络营销,网络优化,平定网站推广为一体的创新建站企业，帮助传统企业提升企业形象加强企业竞争力。可充分满足这一群体相比中小企业更为丰富、高端、多元的互联网需求。同时我们时刻保持专业、时尚、前沿，时刻以成就客户成长自我，坚持不断学习、思考、沉淀、净化自己，让我们为更多的企业打造出实用型网站。

该函数的功能：从字符串S1的左起第N位开始，向右逐位进行搜索匹配字符串S2，如果找到匹配，就返回一个整数指明匹配的位置，否则就返回0。如果缺省n，就是默认从字符串S1的左起第1位开始，进行搜索匹配字符串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 查找字符串

简单点写。

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 中的字符串搜索、查找功能在哪里

有啊，用正则表达式，下面是简单的例子

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