vb.net字符串与字符 vb中的字符串运算符

VB.net, 如何判断一个字符串包含另一个字符串？

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

当在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了。

我觉得这样最简单有效。

相关问答

Q1: vb.net 格式字符串

没有这种函数，自己做一个函数，效率不会低，因为都是简单运算：

Function FillString(ByVal a As String, ByVal b As String, ByVal c As Integer) As String

If a.Length c Then

Return a + StrDup(c - a.Length, b)

Else

Return Mid(a, 1, c)

End If

End Function

Q2: VB.NET中怎样拼接字符串好

vb中可以使用+连接字符串，

也可以使用连接字符串，

建议使用连接字符串，以区别数学运算符+。

Q3: vb.net比较字符串

vb.net规定如果要比较字符串，不能用“=”，strcomp(str1,str2,n)或者string.compare(str1,str2)

例如：

Dim a As String = "c"

Dim b As String = "c"

Dim n As Integer = String.Compare(a, b)

If n = 0 Then

MsgBox("=")

Else

MsgBox("")

End If

Q4: 关于VB.NET连接字符串

Dim da As String = "SELECT Count(检测项目) FROM b where 检测项目='cc'"

这句写错啦,你直接传送的是检测项目为字符串"cc"的参数,并不是你程序写的CC参数

改为:

Dim da As String = "SELECT Count(检测项目) FROM b where 检测项目='" cc "'"

建议通过程序组织的sql语句可以通过msgbox da 弹出来看看,这样你较容易查出是什么错误,较长的就用textbox1.text=da来看了,不过记得设置断点"exit sub"

使用ACCESS数据库的日期列比较，应为：

"select * from 表 where 日期列=" "#" cdate(textbox1.text) "#"

注意前后两个“#”号

使用sqlserver

"select * from 表 where 日期列=" "'" cdate(textbox1.text) "'"

当然日期格式要注意，如长短日期等。

日期期间:between 小日期 and 大日期(记得加#号)

Q5: vb.net 如何实现输出一串字符串中的所有字符以及每个字符的出现次数？

使用一个单重的循环扫描这个字符串中的所有字符，对每一个字符的出现次数进行统计，最后输出每个字符的出现次数。

Private Sub Command1_Click()

s = InputBox("请输入一个英文字符串：")

Dim a(128) As Integer

For i = 1 To Len(s)

t = Asc(Mid(s, i, 1))

a(t) = a(t) + 1

Next i

For i = 1 To 127

If a(i) 0 Then Print Chr(i); ":"; a(i)

Next i

End Sub