重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
字符串比较是从第一个字符开始比较,并且比较的是ASCII码,你比较一下"A" 和"b"谁大谁小,"A" 小于"b",这样后面的就不比较了.也就是"ABCD" 小于 "bumingbai" .
站在用户的角度思考问题,与客户深入沟通,找到岭东网站设计与岭东网站推广的解决方案,凭借多年的经验,让设计与互联网技术结合,创造个性化、用户体验好的作品,建站类型包括:成都网站设计、成都网站制作、外贸网站建设、企业官网、英文网站、手机端网站、网站推广、空间域名、网站空间、企业邮箱。业务覆盖岭东地区。
如果第一个字符相同,就比较第二个,依此类推.
////////////////////////////////////////////////
/////StrComp 函数
返回 Variant (Integer),为字符串比较的结果。
语法
StrComp(string1, string2[, compare])
StrComp 函数的语法有下面的命名参数:
部分 说明
string1 必要参数。任何有效的字符串表达式。
string2 必要参数。任何有效的字符串表达式。
Compare 可选参数。指定字符串比较的类型。如果 compare 参数是 Null,将发生错误。如果省略 compare,Option Compare 的设置将决定比较的类型。
设置
compare 参数设置为:
常数 值 描述
vbUseCompareOption -1 使用Option Compare语句设置执行一个比较。
vbBinaryCompare 0 执行一个二进制比较。
vbTextCompare 1 执行一个按照原文的比较。
vbDatabaseCompare 2 仅适用于Microsoft Access,执行一个基于数据库信息的比较。
返回值
StrComp 函数有下列返回值:
如果 StrComp 返回
string1 小于 string2 -1
string1 等于 string2 0
string1 大于 string2 1
string1 或 string 2为 Null Null
很简单,用字符串查找函数就可以实现了。
当在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了。
我觉得这样最简单有效。
Dim A As String, B As String
A = "123456"
B = "123456"
If A = B Then GoTo xiangdeng
MsgBox "不相等"
GoTo buxiangdeng
xiangdeng:
MsgBox "相等"
buxiangdeng:
用 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.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
VB中的字符串比较实际上是从左到右逐个比较ASCII码,如果两个字符串的ASCII相等说明字符串相等. 实际的比较可以直接用
str1="abcde"
str2=inputbox()....
If str1=str2 then
Print 相等
Else
Print 不相等
end if