VB点虐 , 如何判断一个字符串包含另一个字符串？

很简单，用字符串查找函数就可以实现了。

10年积累的网站制作、网站建设经验，可以快速应对客户对网站的新想法和需求。提供各种问题对应的解决方案。让选择我们的客户得到更好、更有力的网络服务。我虽然不认识你，你也不认识我。但先做网站设计后付款的网站建设流程，更有海门免费网站建设让你可以放心的选择与我们合作。

当在StrB查找到StrA字符串时团枝茄，返回肯定是非0的数，值就是True，找不到为0或者-1，值就是Flase

比如：

Dim StrA As String = "Time is Limited"

Dim StrB As String = "Time"

Dim Stu As Boolean= InStr(StrA, StrB)

这运行段代塌察码，搭拿Stu值就是True了。

我觉得这样最简单有效。

vb点虐 字符串的操作应用

字符串的操作应用

[vb]

Module Module

Sub Main()

定义 个字符串变量

Dim str str str As String

给str str 付初值

str = Hello : str = World

Console WriteLine( 方法Concat )

连接一个或多个字符串

Console WriteLine( str ={ } str ={ } String Concat(str str )={ } str str String Concat(str str ))

判断字符串中是否具有相同的值返回类型为高乱逗布尔型

Console WriteLine( 方法Equals )

Console WriteLine( str ={ } str ={ } String Equals(str )={ } str str str Equals(str ))

在字符串中指定索引位置插入指定的字符串

Console WriteLine( 方法Insert )

str = : str = aaa

Console WriteLine( str ={ } str ={ } str Insert( str )={ } str str str Insert( str ))

左右对齐字符串中的字符

Console WriteLine( 方法PadLeft/PadRight )

str = World : str = 世界

Console WriteLine( str ={ } str )

Console WriteLine( str PadLeft( * )={ } str PadRight( * )={ } str PadLeft( * ) str PadRight( * ))

Console WriteLine( str ={ } str )

Console WriteLine( str PadLeft( * )={ } str PadRight( * )={ } str PadLeft( * ) str PadRight( * ))

找出指定字符串或字符转在此字符串中的第一个 最后一戚卖个匹配项的索引位置

Console WriteLine( 方法IndexOf/LastIndexOf )

str = Visual Basic NET ASP NET C# NET

Console WriteLine( str ={ } str )

Console WriteLine( str IndexOf( NET )={ } str LastIndexOf( NET )={ } str IndexOf( NET ) str LastIndexOf( NET ))

将字符串中的字符复制到字符串数组

Console WriteLine( 方法ToCharArray )

str = str ToCharArray(str IndexOf( NET ) )

Console WriteLine( str ={ } str )

Console WriteLine( str ToCharArray(str IndexOf( NET ) )={ } str )

在指定字符串数组的每个元素之间串联指定的分隔符 产生陪斗单个串联的字符串

Console WriteLine( 方法Join )

Dim myArray( ) As String

myArray( ) = I : myArray( ) = am : myArray( ) = a : myArray( ) = student

For i As Integer = To

Console Write( myArrat({ })={ } i myArray(i))

Next

Console WriteLine()

Console WriteLine( String Join( * myArray)={ } String Join( * myArray))

此字符串中删除指定个数字符

Console WriteLine( 方法Remove )

str =

Console WriteLine( str ={ } str Remove( )={ } str str Remove( ))

将此字符串指定字符串字符的所有匹配项代替为其他指定字符串

Console WriteLine( 方法Replace )

str =

str = abc

Console WriteLine( str ={ } str ={ } str ={ } str Replace(str str )={ } str str str str Replace(str str ))

从此字符串检索字符串

Console WriteLine( 方法SubString )

Console WriteLine( str ={ } str Substring( )={ } str str Substring( ))

Console ReadLine()

End Sub

lishixinzhi/Article/program/net/201311/13956

vb点虐 如何像c#一样判断是否是字符串类型

如果是要做顷瞎判断引用类型可以用TypeOf来乎正判断

Dim s = "666"

If TypeOf (s) Is String Then

Debug.Print("string")

Else

Debug.Print("not string")

End If

如果不知道是否是引用纯空类型，可以这样判断：

Dim s = 666

If VarType(s) = VariantType.String Then

Debug.Print("string")

Else

Debug.Print("not string")

End If

或者：

Dim s = 666

If s.GetType = "".GetType Then

Debug.Print("string")

Else

Debug.Print("not string")

End If

vb点虐 如何判断两个字符串是否相似?

用 Like

% = 任意数量的字符

？= 单个字符

类似简易的正规则比对。

具体裤吵宏可参碰册照MSDN

例：(以下代码可以直接放到程序里执行)

dim str as string

str = "abc123"

if str like "a%"胡册 then msgbox "yes"

if str like "%a%2%" then msgbox "yes"

if str like "%3" then msgbox "yes"

if str like "%3?" = false then msgbox "no"

分享文章：vb点虐 判断字符串 vb 判断字符串是否在另一个字符串中存在
网页地址：http://myzitong.com/article/ddpojdd.html