
返回 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
StrComp 函数示例
本示例使用 StrComp 函数来比较两个字符串。如果第三个参数值为 1,字符串是以文本比较的方式进行比较;如果第三个参数值为 0 或是缺省,则以二进制比较的方式进行比较。
文本比较方式会将大小写字母视为一样,但二进制比较方式则视为不同。
Dim MyStr1, MyStr2, MyComp
MyStr1 = "ABCD ": MyStr2 = "abcd " ' 定义变量。
MyComp = StrComp(MyStr1, MyStr2, 1) ' 返回 0。
MyComp = StrComp(MyStr1, MyStr2, 0) ' 返回 -1。
MyComp = StrComp(MyStr2, MyStr1) ' 返回 1。
Access 是一个数据库管理系统,它用于存储和组织数据。 在许多情况下,Access 会自动将所有输入的单词转换为大写。 这是为了确保数据的准确性,因为计算机中的大小写是有区别的。如果你想要在 Access 中输入小写字母,你可以使用 Shift + 字母键的组合来输入。 例如,要输入小写的“a”,你可以按 Shift + a。
如果你想要更改 Access 中的大小写设置,你可以在“文件”菜单中选择“选项”,然后在“选项”窗口中单击“更改 Access 设置”。 在“更改 Access 设置”窗口中,你可以更改大小写选项以满足你的需要。
ACCESS默认不区分大小写。当我们需要判别大小写时(例如用户的密码需要连大小写都要正确才允许登录)怎么办?我们可以利用设置StrComp函数的“compare”参数来进行判别。
示例如下:
有数据表 USERS
运行SQL语句
SELECT *FROM users where user='001'
AND StrComp(password,'abc',0)=0
无记录返回
运行SQL语句
SELECT *FROM users where user='001'
AND StrComp(password,'Abc',0)=0
返回一条记录
StrComp函数语法说明
另外在ACCESS模块的通用位置的最顶端使用“Option Compare ”语句,可强制VBA代码区分大小写
Option Compare Binary 'ACCESS模块 默认是 Option Compare Database
Option Compare 语句说明见图
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)