
正文
vb.net两个文本比较 vb中怎么比较字符串的大小
提示:扫一扫查出行【扫一扫了解最新限行尾号】
复制提示
vb.net比较字符串
vb.net规定如果要比较字符串vb.net两个文本比较,不能用“=”vb.net两个文本比较,strcomp(str1,str2,n)或者string.compare(str1,str2)
例如vb.net两个文本比较:
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
相关问答
Q1: 如何实现、用VB.NET 检查 两个TXT文件内容是否相同,
If System.IO.File.ReadAllBytes(文件名1).SequenceEqual(System.IO.File.ReadAllBytes(文件名2)) Then
相等
Else
不相等
End If
Q2: VB中的strcomp是比较的两个字符串的什么大小
vb.net两个文本比较你问比较的是什么大小(回答有4种),两个字符串的比较方法根据compare的选项不同就有不同的比较类型,你请看下面vb.net两个文本比较:
StrComp函数的语法是 StrComp(string1, string2[, compare])
string1和string2就不说啦,是两个要接受比较的字符串,必选项哦。
compare选项就有好几个vb.net两个文本比较了,如下vb.net两个文本比较:
-1——使用Option Compare语句设置执行一个比较。
0——执行一个二进制比较。
1——执行一个按照原文的比较。
2——仅适用于Microsoft Access,执行一个基于数据库信息的比较。
返回值如下:
string1 小于 string2 返回-1
string1 等于 string2 返回0
string1 大于 string2 返回1
string1 或 string 2为Null 返回Null
Q3: vb如何把两个文本框内的内容进行比较?
这个好象是书里第三章的内容把
用当循环或FOR循环,每次循环比较text1和text2中的数据
如果相等
static s as integer
s=0
a=text1.text
b=text2.text
c=text3.text
d=text4.text
如果相等
to:
s=s+1
for i=mid$(text1.text,s,1)and mid$(text2.text,s,1)
if i=true then c=text1.text,d=text1.text 或c=text1.text,d=text1.text
c=mid$(text1.text,1,1)或mid$(text2.text,1,1)
if len(text1.text或text2.text) 或 lne(text1.text)或len(text2.text) then
Exit
end if
next
for i=mid$(text1.text)mid$(text2.text)
d=text1.text...或text2.text...
goto to
Q4: vb里如何比较不同的字符串
字符串比较是从第一个字符开始比较,并且比较的是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
执行一个二进制比较。
vbTextCompare
1
执行一个按照原文的比较。
vbDatabaseCompare
2
仅适用于Microsoft
Access,执行一个基于数据库信息的比较。
返回值
StrComp
函数有下列返回值:
如果
StrComp
返回
string1
小于
string2
-1
string1
等于
string2
string1
大于
string2
1
string1
或
string
2为
Null
Null
Q5: vb如何编写文本比较器
刚写完一个简单的例子,给你作个参考吧。希望对你有帮助。
Private Function compFile(strName1 As String, strName2 As String) As Integer
Dim i As Long, j As Long
Dim A1 As Byte, A2 As Byte
Dim FNO1 As Integer, FNO2 As Integer
Dim LNo As Long
FNO1 = FreeFile()
Open strName1 For Binary As FNO1
FNO2 = FreeFile()
Open strName2 For Binary As FNO2
If LOF(FNO1) = LOF(FNO2) Then '取文件小的那个文件的大小作为标准
LNo = LOF(FNO1)
Else
LNo = LOF(FNO2)
End If
For i = 1 To LNo
Get FNO1, i, A1
Get FNO2, i, A2
'读出了数据,可以开始比较并加入相映的处理操作了。
'这里是例子
If A1 A2 Then
MsgBox "在两个文件的第 " i "字节处不匹配"
Close
compFile = 1
Exit Function
End If
Next i
End Function
关于vb.net两个文本比较和vb中怎么比较字符串的大小的介绍到此就结束了,不知道你从中找到你需要的信息了吗 ?如果你还想了解更多这方面的信息,记得收藏关注本站。







